pgloader →
3.6.3-1 →
armhf → 2021-12-28 05:42:05
sbuild (Debian sbuild) 0.72.0 (25 Oct 2016) on mb-lxc-02
+==============================================================================+
| pgloader 3.6.3-1 (armhf) Tue, 28 Dec 2021 05:19:37 +0000 |
+==============================================================================+
Package: pgloader
Version: 3.6.3-1
Source Version: 3.6.3-1
Distribution: bookworm-staging
Machine Architecture: armhf
Host Architecture: armhf
Build Architecture: armhf
I: NOTICE: Log filtering will replace 'var/lib/schroot/mount/bookworm-staging-armhf-sbuild-7b24ee16-e5fa-4eff-9458-9c400150db80' with '<<CHROOT>>'
+------------------------------------------------------------------------------+
| Update chroot |
+------------------------------------------------------------------------------+
Get:1 http://172.17.4.1/private bookworm-staging InRelease [11.3 kB]
Get:2 http://172.17.4.1/private bookworm-staging/main Sources [12.6 MB]
Get:3 http://172.17.4.1/private bookworm-staging/main armhf Packages [13.5 MB]
Fetched 26.2 MB in 12s (2111 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: 'pgloader' packaging is maintained in the 'Git' version control system at:
https://github.com/dimitri/pgloader.git
Please use:
git clone https://github.com/dimitri/pgloader.git
to retrieve the latest (possibly unreleased) updates to the package.
Need to get 3730 kB of source archives.
Get:1 http://172.17.4.1/private bookworm-staging/main pgloader 3.6.3-1 (dsc) [2680 B]
Get:2 http://172.17.4.1/private bookworm-staging/main pgloader 3.6.3-1 (tar) [3718 kB]
Get:3 http://172.17.4.1/private bookworm-staging/main pgloader 3.6.3-1 (diff) [8708 B]
Fetched 3730 kB in 1s (3374 kB/s)
Download complete and in download only mode
I: NOTICE: Log filtering will replace 'build/pgloader-0DJDto/pgloader-3.6.3' with '<<PKGBUILDDIR>>'
I: NOTICE: Log filtering will replace 'build/pgloader-0DJDto' 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-YXLnB7/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-YXLnB7/gpg/pubring.kbx' created
gpg: /<<BUILDDIR>>/resolver-YXLnB7/gpg/trustdb.gpg: trustdb created
gpg: key 37145E60F90AF620: 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 37145E60F90AF620: "Sbuild Signer (Sbuild Build Dependency Archive Key) <buildd-tools-devel@lists.alioth.debian.org>" not changed
gpg: key 37145E60F90AF620: 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-YXLnB7/apt_archive ./ InRelease
Get:2 copy:/<<BUILDDIR>>/resolver-YXLnB7/apt_archive ./ Release [957 B]
Get:3 copy:/<<BUILDDIR>>/resolver-YXLnB7/apt_archive ./ Release.gpg [370 B]
Get:4 copy:/<<BUILDDIR>>/resolver-YXLnB7/apt_archive ./ Sources [349 B]
Get:5 copy:/<<BUILDDIR>>/resolver-YXLnB7/apt_archive ./ Packages [434 B]
Fetched 2110 B in 1s (3361 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:
netbase sensible-utils
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 40 not upgraded.
Need to get 852 B of archives.
After this operation, 0 B of additional disk space will be used.
Get:1 copy:/<<BUILDDIR>>/resolver-YXLnB7/apt_archive ./ sbuild-build-depends-core-dummy 0.invalid.0 [852 B]
debconf: delaying package configuration, since apt-utils is not installed
Fetched 852 B in 0s (41.9 kB/s)
Selecting previously unselected package sbuild-build-depends-core-dummy.
(Reading database ... 12559 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: buildapp (>= 1.5), cl-abnf, cl-alexandria, cl-asdf (>= 3.0.3), cl-asdf-finalizers, cl-asdf-system-connections, cl-bordeaux-threads (>= 0.8.3), cl-cffi (>= 1:0.12.0), cl-command-line-arguments, cl-csv (>= 20180712), cl-db3 (>= 20200212), cl-drakma, cl-esrap, cl-fad, cl-flexi-streams, cl-interpol, cl-ixf, cl-local-time, cl-log, cl-lparallel, cl-markdown, cl-md5, cl-metabang-bind, cl-mssql, cl-mustache, cl-plus-ssl (>= 20190204), cl-postmodern, cl-ppcre, cl-py-configparser, cl-qmynd, cl-quri, cl-simple-date, cl-split-sequence, cl-sqlite, cl-trivial-backtrace, cl-trivial-utf-8, cl-unicode, cl-usocket, cl-utilities, cl-uuid, cl-yason, cl-zs3, debhelper-compat (= 13), gawk, help2man, python3-sphinx-rtd-theme, python3-sphinx, sbcl (>= 1.1.13), tzdata
Filtered Build-Depends: buildapp (>= 1.5), cl-abnf, cl-alexandria, cl-asdf (>= 3.0.3), cl-asdf-finalizers, cl-asdf-system-connections, cl-bordeaux-threads (>= 0.8.3), cl-cffi (>= 1:0.12.0), cl-command-line-arguments, cl-csv (>= 20180712), cl-db3 (>= 20200212), cl-drakma, cl-esrap, cl-fad, cl-flexi-streams, cl-interpol, cl-ixf, cl-local-time, cl-log, cl-lparallel, cl-markdown, cl-md5, cl-metabang-bind, cl-mssql, cl-mustache, cl-plus-ssl (>= 20190204), cl-postmodern, cl-ppcre, cl-py-configparser, cl-qmynd, cl-quri, cl-simple-date, cl-split-sequence, cl-sqlite, cl-trivial-backtrace, cl-trivial-utf-8, cl-unicode, cl-usocket, cl-utilities, cl-uuid, cl-yason, cl-zs3, debhelper-compat (= 13), gawk, help2man, python3-sphinx-rtd-theme, python3-sphinx, sbcl (>= 1.1.13), tzdata
dpkg-deb: building package 'sbuild-build-depends-pgloader-dummy' in '/<<BUILDDIR>>/resolver-YXLnB7/apt_archive/sbuild-build-depends-pgloader-dummy.deb'.
dpkg-scanpackages: warning: Packages in archive but missing from override file:
dpkg-scanpackages: warning: sbuild-build-depends-core-dummy sbuild-build-depends-pgloader-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-YXLnB7/apt_archive ./ InRelease
Get:2 copy:/<<BUILDDIR>>/resolver-YXLnB7/apt_archive ./ Release [963 B]
Get:3 copy:/<<BUILDDIR>>/resolver-YXLnB7/apt_archive ./ Release.gpg [370 B]
Get:4 copy:/<<BUILDDIR>>/resolver-YXLnB7/apt_archive ./ Sources [863 B]
Get:5 copy:/<<BUILDDIR>>/resolver-YXLnB7/apt_archive ./ Packages [940 B]
Fetched 3136 B in 1s (4809 B/s)
Reading package lists...
W: No sandbox user '_apt' on the system, can not drop privileges
Reading package lists...
Install pgloader build dependencies (apt-based resolver)
--------------------------------------------------------
Installing build dependencies
Reading package lists...
Building dependency tree...
Reading state information...
The following package was automatically installed and is no longer required:
netbase
Use 'apt autoremove' to remove it.
The following additional packages will be installed:
autoconf automake autopoint autotools-dev bsdextrautils buildapp
ca-certificates cl-abnf cl-alexandria cl-anaphora cl-asdf cl-asdf-finalizers
cl-asdf-system-connections cl-babel cl-base64 cl-bordeaux-threads cl-cffi
cl-chipz cl-chunga cl-closer-mop cl-closure-common cl-command-line-arguments
cl-containers cl-csv cl-cxml cl-db3 cl-drakma cl-dynamic-classes cl-esrap
cl-fad cl-flexi-streams cl-garbage-pools cl-ieee-floats cl-interpol
cl-ironclad cl-iterate cl-ixf cl-kmrcl cl-local-time cl-log cl-lparallel
cl-markdown cl-md5 cl-metabang-bind cl-metatilities-base cl-mssql
cl-mustache cl-named-readtables cl-parse-number cl-plus-ssl cl-postgres
cl-postmodern cl-ppcre cl-puri cl-py-configparser cl-qmynd cl-quri cl-rt
cl-s-sql cl-simple-date cl-split-sequence cl-sqlite cl-trivial-backtrace
cl-trivial-features cl-trivial-garbage cl-trivial-gray-streams
cl-trivial-utf-8 cl-unicode cl-usocket cl-utilities cl-uuid cl-yason cl-zs3
debhelper dh-autoreconf dh-strip-nondeterminism docutils-common dwz file
fonts-font-awesome fonts-lato freetds-common freetds-dev gawk gettext
gettext-base groff-base help2man intltool-debian libarchive-zip-perl libct4
libdebhelper-perl libelf1 libexpat1 libffi-dev
libfile-stripnondeterminism-perl libglib2.0-0 libicu67 libjs-jquery
libjs-sphinxdoc libjs-underscore libmagic-mgc libmagic1 libmpdec3
libpipeline1 libpython3-stdlib libpython3.9-minimal libpython3.9-stdlib
libsigsegv2 libsub-override-perl libsybdb5 libtool libuchardet0 libxml2 m4
man-db media-types openssl pkg-config po-debconf python-babel-localedata
python3 python3-alabaster python3-babel python3-certifi python3-chardet
python3-distutils python3-docutils python3-idna python3-imagesize
python3-jinja2 python3-lib2to3 python3-markupsafe python3-minimal
python3-packaging python3-pkg-resources python3-pygments python3-pyparsing
python3-requests python3-roman python3-six python3-snowballstemmer
python3-sphinx python3-sphinx-rtd-theme python3-tz python3-urllib3 python3.9
python3.9-minimal sbcl sgml-base sphinx-common sphinx-rtd-theme-common
xml-core zlib1g-dev
Suggested packages:
autoconf-archive gnu-standards autoconf-doc cl-launch dh-make gawk-doc
gettext-doc libasprintf-dev libgettextpo-dev groff libtool-doc gfortran
| fortran95-compiler gcj-jdk m4-doc apparmor less www-browser
libmail-box-perl python3-doc python3-tk python3-venv docutils-doc
fonts-linuxlibertine | ttf-linux-libertine texlive-lang-french
texlive-latex-base texlive-latex-recommended python-jinja2-doc
python3-setuptools python-pygments-doc ttf-bitstream-vera
python-pyparsing-doc python3-cryptography python3-openssl python3-socks
python-requests-doc python3-stemmer dvipng fonts-freefont-otf
imagemagick-6.q16 latexmk libjs-mathjax sphinx-doc tex-gyre
texlive-fonts-recommended texlive-latex-extra texlive-plain-generic
python3.9-venv python3.9-doc binfmt-support sbcl-doc sbcl-source slime
sgml-base-doc
Recommended packages:
cl-fiveam cl-ptester curl | wget | lynx libarchive-cpio-perl libglib2.0-data
shared-mime-info xdg-user-dirs javascript-common libltdl-dev
libmail-sendmail-perl libpaper-utils python3-pil binfmt-support
The following NEW packages will be installed:
autoconf automake autopoint autotools-dev bsdextrautils buildapp
ca-certificates cl-abnf cl-alexandria cl-anaphora cl-asdf cl-asdf-finalizers
cl-asdf-system-connections cl-babel cl-base64 cl-bordeaux-threads cl-cffi
cl-chipz cl-chunga cl-closer-mop cl-closure-common cl-command-line-arguments
cl-containers cl-csv cl-cxml cl-db3 cl-drakma cl-dynamic-classes cl-esrap
cl-fad cl-flexi-streams cl-garbage-pools cl-ieee-floats cl-interpol
cl-ironclad cl-iterate cl-ixf cl-kmrcl cl-local-time cl-log cl-lparallel
cl-markdown cl-md5 cl-metabang-bind cl-metatilities-base cl-mssql
cl-mustache cl-named-readtables cl-parse-number cl-plus-ssl cl-postgres
cl-postmodern cl-ppcre cl-puri cl-py-configparser cl-qmynd cl-quri cl-rt
cl-s-sql cl-simple-date cl-split-sequence cl-sqlite cl-trivial-backtrace
cl-trivial-features cl-trivial-garbage cl-trivial-gray-streams
cl-trivial-utf-8 cl-unicode cl-usocket cl-utilities cl-uuid cl-yason cl-zs3
debhelper dh-autoreconf dh-strip-nondeterminism docutils-common dwz file
fonts-font-awesome fonts-lato freetds-common freetds-dev gawk gettext
gettext-base groff-base help2man intltool-debian libarchive-zip-perl libct4
libdebhelper-perl libelf1 libexpat1 libffi-dev
libfile-stripnondeterminism-perl libglib2.0-0 libicu67 libjs-jquery
libjs-sphinxdoc libjs-underscore libmagic-mgc libmagic1 libmpdec3
libpipeline1 libpython3-stdlib libpython3.9-minimal libpython3.9-stdlib
libsigsegv2 libsub-override-perl libsybdb5 libtool libuchardet0 libxml2 m4
man-db media-types openssl pkg-config po-debconf python-babel-localedata
python3 python3-alabaster python3-babel python3-certifi python3-chardet
python3-distutils python3-docutils python3-idna python3-imagesize
python3-jinja2 python3-lib2to3 python3-markupsafe python3-minimal
python3-packaging python3-pkg-resources python3-pygments python3-pyparsing
python3-requests python3-roman python3-six python3-snowballstemmer
python3-sphinx python3-sphinx-rtd-theme python3-tz python3-urllib3 python3.9
python3.9-minimal sbcl sbuild-build-depends-pgloader-dummy sgml-base
sphinx-common sphinx-rtd-theme-common xml-core zlib1g-dev
0 upgraded, 155 newly installed, 0 to remove and 40 not upgraded.
Need to get 61.9 MB of archives.
After this operation, 268 MB of additional disk space will be used.
Get:1 copy:/<<BUILDDIR>>/resolver-YXLnB7/apt_archive ./ sbuild-build-depends-pgloader-dummy 0.invalid.0 [1224 B]
Get:2 http://172.17.4.1/private bookworm-staging/main armhf bsdextrautils armhf 2.37.2-4 [135 kB]
Get:3 http://172.17.4.1/private bookworm-staging/main armhf libuchardet0 armhf 0.0.7-1 [65.0 kB]
Get:4 http://172.17.4.1/private bookworm-staging/main armhf groff-base armhf 1.22.4-7 [793 kB]
Get:5 http://172.17.4.1/private bookworm-staging/main armhf libpipeline1 armhf 1.5.4-1 [31.6 kB]
Get:6 http://172.17.4.1/private bookworm-staging/main armhf man-db armhf 2.9.4-2 [1307 kB]
Get:7 http://172.17.4.1/private bookworm-staging/main armhf fonts-lato all 2.0-2.1 [2696 kB]
Get:8 http://172.17.4.1/private bookworm-staging/main armhf libsigsegv2 armhf 2.13-1 [34.3 kB]
Get:9 http://172.17.4.1/private bookworm-staging/main armhf gawk armhf 1:5.1.0-1 [533 kB]
Get:10 http://172.17.4.1/private bookworm-staging/main armhf libpython3.9-minimal armhf 3.9.9-2+rpi1 [794 kB]
Get:11 http://172.17.4.1/private bookworm-staging/main armhf libexpat1 armhf 2.4.1-3 [80.1 kB]
Get:12 http://172.17.4.1/private bookworm-staging/main armhf python3.9-minimal armhf 3.9.9-2+rpi1 [1583 kB]
Get:13 http://172.17.4.1/private bookworm-staging/main armhf python3-minimal armhf 3.9.7-1 [38.4 kB]
Get:14 http://172.17.4.1/private bookworm-staging/main armhf media-types all 4.0.0 [30.3 kB]
Get:15 http://172.17.4.1/private bookworm-staging/main armhf libmpdec3 armhf 2.5.1-2+rpi1 [73.5 kB]
Get:16 http://172.17.4.1/private bookworm-staging/main armhf libpython3.9-stdlib armhf 3.9.9-2+rpi1 [1609 kB]
Get:17 http://172.17.4.1/private bookworm-staging/main armhf python3.9 armhf 3.9.9-2+rpi1 [484 kB]
Get:18 http://172.17.4.1/private bookworm-staging/main armhf libpython3-stdlib armhf 3.9.7-1 [21.6 kB]
Get:19 http://172.17.4.1/private bookworm-staging/main armhf python3 armhf 3.9.7-1 [38.0 kB]
Get:20 http://172.17.4.1/private bookworm-staging/main armhf sgml-base all 1.30 [15.1 kB]
Get:21 http://172.17.4.1/private bookworm-staging/main armhf libmagic-mgc armhf 1:5.41-2 [295 kB]
Get:22 http://172.17.4.1/private bookworm-staging/main armhf libmagic1 armhf 1:5.41-2 [119 kB]
Get:23 http://172.17.4.1/private bookworm-staging/main armhf file armhf 1:5.41-2 [65.8 kB]
Get:24 http://172.17.4.1/private bookworm-staging/main armhf gettext-base armhf 0.21-4 [171 kB]
Get:25 http://172.17.4.1/private bookworm-staging/main armhf m4 armhf 1.4.18-5 [186 kB]
Get:26 http://172.17.4.1/private bookworm-staging/main armhf autoconf all 2.71-2 [343 kB]
Get:27 http://172.17.4.1/private bookworm-staging/main armhf autotools-dev all 20180224.1+nmu1 [77.1 kB]
Get:28 http://172.17.4.1/private bookworm-staging/main armhf automake all 1:1.16.5-1.1 [823 kB]
Get:29 http://172.17.4.1/private bookworm-staging/main armhf autopoint all 0.21-4 [510 kB]
Get:30 http://172.17.4.1/private bookworm-staging/main armhf sbcl armhf 2:2.1.11-1 [7630 kB]
Get:31 http://172.17.4.1/private bookworm-staging/main armhf buildapp armhf 1.5.6-3 [7047 kB]
Get:32 http://172.17.4.1/private bookworm-staging/main armhf openssl armhf 1.1.1m-1 [815 kB]
Get:33 http://172.17.4.1/private bookworm-staging/main armhf ca-certificates all 20210119 [158 kB]
Get:34 http://172.17.4.1/private bookworm-staging/main armhf cl-alexandria all 20211025.gita67c3a6-1 [212 kB]
Get:35 http://172.17.4.1/private bookworm-staging/main armhf cl-esrap all 20211008.gitc99c33a-1 [54.0 kB]
Get:36 http://172.17.4.1/private bookworm-staging/main armhf cl-ppcre all 20190407.git1ca0cd9-2 [113 kB]
Get:37 http://172.17.4.1/private bookworm-staging/main armhf cl-abnf all 20200229.gitba1fbb1-1 [11.4 kB]
Get:38 http://172.17.4.1/private bookworm-staging/main armhf cl-anaphora all 20210111.gitab5f07e-1 [7876 B]
Get:39 http://172.17.4.1/private bookworm-staging/main armhf cl-asdf all 2:3.3.5-1 [1282 kB]
Get:40 http://172.17.4.1/private bookworm-staging/main armhf cl-asdf-finalizers all 20170403-1.1 [9620 B]
Get:41 http://172.17.4.1/private bookworm-staging/main armhf cl-asdf-system-connections all 20170124-1.1 [5080 B]
Get:42 http://172.17.4.1/private bookworm-staging/main armhf cl-trivial-features all 20210228.gitf6e8dd7-2 [10.9 kB]
Get:43 http://172.17.4.1/private bookworm-staging/main armhf cl-trivial-gray-streams all 20210117.git2b3823e-1 [10.5 kB]
Get:44 http://172.17.4.1/private bookworm-staging/main armhf cl-babel all 20200719.gitf892d05-2 [125 kB]
Get:45 http://172.17.4.1/private bookworm-staging/main armhf cl-rt all 20090812.gita6a7503-1 [13.2 kB]
Get:46 http://172.17.4.1/private bookworm-staging/main armhf cl-kmrcl all 1.111-2 [46.7 kB]
Get:47 http://172.17.4.1/private bookworm-staging/main armhf cl-base64 all 3.4.0-1 [9936 B]
Get:48 http://172.17.4.1/private bookworm-staging/main armhf cl-bordeaux-threads all 0.8.8-5 [23.2 kB]
Get:49 http://172.17.4.1/private bookworm-staging/main armhf libglib2.0-0 armhf 2.70.2-1 [1210 kB]
Get:50 http://172.17.4.1/private bookworm-staging/main armhf pkg-config armhf 0.29.2-1 [61.5 kB]
Get:51 http://172.17.4.1/private bookworm-staging/main armhf libffi-dev armhf 3.4.2-3 [61.6 kB]
Get:52 http://172.17.4.1/private bookworm-staging/main armhf zlib1g-dev armhf 1:1.2.11.dfsg-2 [184 kB]
Get:53 http://172.17.4.1/private bookworm-staging/main armhf cl-cffi all 1:0.24.1-2 [1682 kB]
Get:54 http://172.17.4.1/private bookworm-staging/main armhf cl-chipz all 20190121.git0f6c9ea-1 [37.2 kB]
Get:55 http://172.17.4.1/private bookworm-staging/main armhf cl-chunga all 20200403.gitcb333cd-1 [19.4 kB]
Get:56 http://172.17.4.1/private bookworm-staging/main armhf cl-closer-mop all 2:20201029.git91f877a-1 [25.6 kB]
Get:57 http://172.17.4.1/private bookworm-staging/main armhf cl-closure-common all 20101107-1.1 [25.2 kB]
Get:58 http://172.17.4.1/private bookworm-staging/main armhf cl-command-line-arguments all 20151218-1.1 [9544 B]
Get:59 http://172.17.4.1/private bookworm-staging/main armhf cl-metatilities-base all 20170403-1.1 [51.9 kB]
Get:60 http://172.17.4.1/private bookworm-staging/main armhf cl-containers all 20170403-1.1 [114 kB]
Get:61 http://172.17.4.1/private bookworm-staging/main armhf cl-iterate all 20210519.gitb0f9a9c-1 [49.3 kB]
Get:62 http://172.17.4.1/private bookworm-staging/main armhf cl-flexi-streams all 20210728.git41af5dc-1 [176 kB]
Get:63 http://172.17.4.1/private bookworm-staging/main armhf cl-unicode all 20201101.git54bdf2c-1 [1316 kB]
Get:64 http://172.17.4.1/private bookworm-staging/main armhf cl-named-readtables all 20201221.gitc5689a4-1 [28.0 kB]
Get:65 http://172.17.4.1/private bookworm-staging/main armhf cl-interpol all 20201106.git70a1137-1 [32.8 kB]
Get:66 http://172.17.4.1/private bookworm-staging/main armhf cl-csv all 20200929.git68ecb5d-1 [27.7 kB]
Get:67 http://172.17.4.1/private bookworm-staging/main armhf cl-cxml all 20110619-2.1 [82.5 kB]
Get:68 http://172.17.4.1/private bookworm-staging/main armhf cl-db3 all 20200212-1 [8388 B]
Get:69 http://172.17.4.1/private bookworm-staging/main armhf cl-puri all 1:1.5.7.2-1 [19.1 kB]
Get:70 http://172.17.4.1/private bookworm-staging/main armhf cl-split-sequence all 1:2.0.1-1 [11.9 kB]
Get:71 http://172.17.4.1/private bookworm-staging/main armhf cl-usocket all 0.8.3-2 [74.9 kB]
Get:72 http://172.17.4.1/private bookworm-staging/main armhf cl-trivial-garbage all 20200801.git2319892-1 [8616 B]
Get:73 http://172.17.4.1/private bookworm-staging/main armhf cl-plus-ssl all 20200609.gitff4634a-1 [42.9 kB]
Get:74 http://172.17.4.1/private bookworm-staging/main armhf cl-drakma all 2.0.8-1 [46.3 kB]
Get:75 http://172.17.4.1/private bookworm-staging/main armhf cl-dynamic-classes all 20130128-2.1 [6916 B]
Get:76 http://172.17.4.1/private bookworm-staging/main armhf cl-fad all 20200513.git1c15a90-1 [23.8 kB]
Get:77 http://172.17.4.1/private bookworm-staging/main armhf cl-garbage-pools all 20130720-1.1 [3144 B]
Get:78 http://172.17.4.1/private bookworm-staging/main armhf cl-ieee-floats all 20170830-1.1 [6828 B]
Get:79 http://172.17.4.1/private bookworm-staging/main armhf cl-ironclad all 0.56-1 [1168 kB]
Get:80 http://172.17.4.1/private bookworm-staging/main armhf cl-ixf all 20180228-1.1 [9852 B]
Get:81 http://172.17.4.1/private bookworm-staging/main armhf cl-local-time all 20180228-1.1 [26.7 kB]
Get:82 http://172.17.4.1/private bookworm-staging/main armhf cl-log all 1.0.1-1.1 [20.8 kB]
Get:83 http://172.17.4.1/private bookworm-staging/main armhf cl-lparallel all 20160825-1.1 [49.8 kB]
Get:84 http://172.17.4.1/private bookworm-staging/main armhf cl-metabang-bind all 20200101.git9ab6e64-1 [17.6 kB]
Get:85 http://172.17.4.1/private bookworm-staging/main armhf cl-markdown all 20101006-2.1 [37.4 kB]
Get:86 http://172.17.4.1/private bookworm-staging/main armhf cl-md5 all 1:20180224.gitb141260-1 [14.6 kB]
Get:87 http://172.17.4.1/private bookworm-staging/main armhf freetds-common all 1.2.3-1 [32.5 kB]
Get:88 http://172.17.4.1/private bookworm-staging/main armhf libct4 armhf 1.2.3-1 [145 kB]
Get:89 http://172.17.4.1/private bookworm-staging/main armhf libsybdb5 armhf 1.2.3-1 [167 kB]
Get:90 http://172.17.4.1/private bookworm-staging/main armhf freetds-dev armhf 1.2.3-1 [241 kB]
Get:91 http://172.17.4.1/private bookworm-staging/main armhf cl-mssql all 20180228-1.1 [8652 B]
Get:92 http://172.17.4.1/private bookworm-staging/main armhf cl-mustache all 0.12.1-9-g684f227-1.1 [9880 B]
Get:93 http://172.17.4.1/private bookworm-staging/main armhf cl-parse-number all 1.7-1.1 [7368 B]
Get:94 http://172.17.4.1/private bookworm-staging/main armhf cl-postgres all 20180430-2 [33.2 kB]
Get:95 http://172.17.4.1/private bookworm-staging/main armhf cl-s-sql all 20180430-2 [28.6 kB]
Get:96 http://172.17.4.1/private bookworm-staging/main armhf cl-postmodern all 20180430-2 [63.3 kB]
Get:97 http://172.17.4.1/private bookworm-staging/main armhf cl-py-configparser all 20170830-1.1 [8612 B]
Get:98 http://172.17.4.1/private bookworm-staging/main armhf cl-qmynd all 20180131-1.1 [37.3 kB]
Get:99 http://172.17.4.1/private bookworm-staging/main armhf cl-quri all 20150804-1.1 [66.5 kB]
Get:100 http://172.17.4.1/private bookworm-staging/main armhf cl-simple-date all 20180430-2 [9016 B]
Get:101 http://172.17.4.1/private bookworm-staging/main armhf cl-sqlite all 20130615-2.1 [14.7 kB]
Get:102 http://172.17.4.1/private bookworm-staging/main armhf cl-trivial-backtrace all 20200511.git6eb65bd-1 [10.1 kB]
Get:103 http://172.17.4.1/private bookworm-staging/main armhf cl-trivial-utf-8 all 20111001-1.1 [7760 B]
Get:104 http://172.17.4.1/private bookworm-staging/main armhf cl-utilities all 1.2.4-3.2 [22.2 kB]
Get:105 http://172.17.4.1/private bookworm-staging/main armhf cl-uuid all 20130813-1.1 [6876 B]
Get:106 http://172.17.4.1/private bookworm-staging/main armhf cl-yason all 0.7.6-1.1 [10.0 kB]
Get:107 http://172.17.4.1/private bookworm-staging/main armhf cl-zs3 all 1.3.1-1.1 [48.6 kB]
Get:108 http://172.17.4.1/private bookworm-staging/main armhf libdebhelper-perl all 13.5.2 [192 kB]
Get:109 http://172.17.4.1/private bookworm-staging/main armhf libtool all 2.4.6-15 [513 kB]
Get:110 http://172.17.4.1/private bookworm-staging/main armhf dh-autoreconf all 20 [17.1 kB]
Get:111 http://172.17.4.1/private bookworm-staging/main armhf libarchive-zip-perl all 1.68-1 [104 kB]
Get:112 http://172.17.4.1/private bookworm-staging/main armhf libsub-override-perl all 0.09-2 [10.2 kB]
Get:113 http://172.17.4.1/private bookworm-staging/main armhf libfile-stripnondeterminism-perl all 1.13.0-1 [26.6 kB]
Get:114 http://172.17.4.1/private bookworm-staging/main armhf dh-strip-nondeterminism all 1.13.0-1 [15.8 kB]
Get:115 http://172.17.4.1/private bookworm-staging/main armhf libelf1 armhf 0.186-1 [174 kB]
Get:116 http://172.17.4.1/private bookworm-staging/main armhf dwz armhf 0.14-1 [83.0 kB]
Get:117 http://172.17.4.1/private bookworm-staging/main armhf libicu67 armhf 67.1-7 [8291 kB]
Get:118 http://172.17.4.1/private bookworm-staging/main armhf libxml2 armhf 2.9.12+dfsg-5 [584 kB]
Get:119 http://172.17.4.1/private bookworm-staging/main armhf gettext armhf 0.21-4 [1215 kB]
Get:120 http://172.17.4.1/private bookworm-staging/main armhf intltool-debian all 0.35.0+20060710.5 [26.8 kB]
Get:121 http://172.17.4.1/private bookworm-staging/main armhf po-debconf all 1.0.21+nmu1 [248 kB]
Get:122 http://172.17.4.1/private bookworm-staging/main armhf debhelper all 13.5.2 [1056 kB]
Get:123 http://172.17.4.1/private bookworm-staging/main armhf xml-core all 0.18+nmu1 [23.8 kB]
Get:124 http://172.17.4.1/private bookworm-staging/main armhf docutils-common all 0.17.1+dfsg-2 [127 kB]
Get:125 http://172.17.4.1/private bookworm-staging/main armhf fonts-font-awesome all 5.0.10+really4.7.0~dfsg-4.1 [517 kB]
Get:126 http://172.17.4.1/private bookworm-staging/main armhf help2man armhf 1.48.5 [143 kB]
Get:127 http://172.17.4.1/private bookworm-staging/main armhf libjs-jquery all 3.5.1+dfsg+~3.5.5-8 [315 kB]
Get:128 http://172.17.4.1/private bookworm-staging/main armhf libjs-underscore all 1.9.1~dfsg-4 [100 kB]
Get:129 http://172.17.4.1/private bookworm-staging/main armhf libjs-sphinxdoc all 4.3.2-1 [139 kB]
Get:130 http://172.17.4.1/private bookworm-staging/main armhf python-babel-localedata all 2.8.0+dfsg.1-7 [4997 kB]
Get:131 http://172.17.4.1/private bookworm-staging/main armhf python3-alabaster all 0.7.12-1 [20.8 kB]
Get:132 http://172.17.4.1/private bookworm-staging/main armhf python3-pkg-resources all 58.2.0-1 [192 kB]
Get:133 http://172.17.4.1/private bookworm-staging/main armhf python3-tz all 2021.3-1 [34.9 kB]
Get:134 http://172.17.4.1/private bookworm-staging/main armhf python3-babel all 2.8.0+dfsg.1-7 [100 kB]
Get:135 http://172.17.4.1/private bookworm-staging/main armhf python3-certifi all 2020.6.20-1 [151 kB]
Get:136 http://172.17.4.1/private bookworm-staging/main armhf python3-chardet all 4.0.0-1 [99.0 kB]
Get:137 http://172.17.4.1/private bookworm-staging/main armhf python3-lib2to3 all 3.9.9-3 [79.5 kB]
Get:138 http://172.17.4.1/private bookworm-staging/main armhf python3-distutils all 3.9.9-3 [146 kB]
Get:139 http://172.17.4.1/private bookworm-staging/main armhf python3-roman all 3.3-1 [10.7 kB]
Get:140 http://172.17.4.1/private bookworm-staging/main armhf python3-docutils all 0.17.1+dfsg-2 [393 kB]
Get:141 http://172.17.4.1/private bookworm-staging/main armhf python3-idna all 3.2-2 [38.1 kB]
Get:142 http://172.17.4.1/private bookworm-staging/main armhf python3-imagesize all 1.3.0-1 [6360 B]
Get:143 http://172.17.4.1/private bookworm-staging/main armhf python3-markupsafe armhf 2.0.1-2 [13.1 kB]
Get:144 http://172.17.4.1/private bookworm-staging/main armhf python3-jinja2 all 3.0.1-2 [121 kB]
Get:145 http://172.17.4.1/private bookworm-staging/main armhf python3-pyparsing all 2.4.7-1 [109 kB]
Get:146 http://172.17.4.1/private bookworm-staging/main armhf python3-packaging all 21.3-1 [34.1 kB]
Get:147 http://172.17.4.1/private bookworm-staging/main armhf python3-pygments all 2.7.1+dfsg-2.1 [657 kB]
Get:148 http://172.17.4.1/private bookworm-staging/main armhf python3-six all 1.16.0-2 [17.5 kB]
Get:149 http://172.17.4.1/private bookworm-staging/main armhf python3-urllib3 all 1.26.5-1~exp1 [114 kB]
Get:150 http://172.17.4.1/private bookworm-staging/main armhf python3-requests all 2.25.1+dfsg-2 [69.3 kB]
Get:151 http://172.17.4.1/private bookworm-staging/main armhf python3-snowballstemmer all 2.2.0-1 [58.5 kB]
Get:152 http://172.17.4.1/private bookworm-staging/main armhf sphinx-common all 4.3.2-1 [629 kB]
Get:153 http://172.17.4.1/private bookworm-staging/main armhf python3-sphinx all 4.3.2-1 [533 kB]
Get:154 http://172.17.4.1/private bookworm-staging/main armhf sphinx-rtd-theme-common all 1.0.0+dfsg-1 [996 kB]
Get:155 http://172.17.4.1/private bookworm-staging/main armhf python3-sphinx-rtd-theme all 1.0.0+dfsg-1 [26.5 kB]
debconf: delaying package configuration, since apt-utils is not installed
Fetched 61.9 MB in 15s (4204 kB/s)
Selecting previously unselected package bsdextrautils.
(Reading database ... 12559 files and directories currently installed.)
Preparing to unpack .../0-bsdextrautils_2.37.2-4_armhf.deb ...
Unpacking bsdextrautils (2.37.2-4) ...
Selecting previously unselected package libuchardet0:armhf.
Preparing to unpack .../1-libuchardet0_0.0.7-1_armhf.deb ...
Unpacking libuchardet0:armhf (0.0.7-1) ...
Selecting previously unselected package groff-base.
Preparing to unpack .../2-groff-base_1.22.4-7_armhf.deb ...
Unpacking groff-base (1.22.4-7) ...
Selecting previously unselected package libpipeline1:armhf.
Preparing to unpack .../3-libpipeline1_1.5.4-1_armhf.deb ...
Unpacking libpipeline1:armhf (1.5.4-1) ...
Selecting previously unselected package man-db.
Preparing to unpack .../4-man-db_2.9.4-2_armhf.deb ...
Unpacking man-db (2.9.4-2) ...
Selecting previously unselected package fonts-lato.
Preparing to unpack .../5-fonts-lato_2.0-2.1_all.deb ...
Unpacking fonts-lato (2.0-2.1) ...
Selecting previously unselected package libsigsegv2:armhf.
Preparing to unpack .../6-libsigsegv2_2.13-1_armhf.deb ...
Unpacking libsigsegv2:armhf (2.13-1) ...
Setting up libsigsegv2:armhf (2.13-1) ...
Selecting previously unselected package gawk.
(Reading database ... 13167 files and directories currently installed.)
Preparing to unpack .../gawk_1%3a5.1.0-1_armhf.deb ...
Unpacking gawk (1:5.1.0-1) ...
Selecting previously unselected package libpython3.9-minimal:armhf.
Preparing to unpack .../libpython3.9-minimal_3.9.9-2+rpi1_armhf.deb ...
Unpacking libpython3.9-minimal:armhf (3.9.9-2+rpi1) ...
Selecting previously unselected package libexpat1:armhf.
Preparing to unpack .../libexpat1_2.4.1-3_armhf.deb ...
Unpacking libexpat1:armhf (2.4.1-3) ...
Selecting previously unselected package python3.9-minimal.
Preparing to unpack .../python3.9-minimal_3.9.9-2+rpi1_armhf.deb ...
Unpacking python3.9-minimal (3.9.9-2+rpi1) ...
Setting up libpython3.9-minimal:armhf (3.9.9-2+rpi1) ...
Setting up libexpat1:armhf (2.4.1-3) ...
Setting up python3.9-minimal (3.9.9-2+rpi1) ...
Selecting previously unselected package python3-minimal.
(Reading database ... 13636 files and directories currently installed.)
Preparing to unpack .../0-python3-minimal_3.9.7-1_armhf.deb ...
Unpacking python3-minimal (3.9.7-1) ...
Selecting previously unselected package media-types.
Preparing to unpack .../1-media-types_4.0.0_all.deb ...
Unpacking media-types (4.0.0) ...
Selecting previously unselected package libmpdec3:armhf.
Preparing to unpack .../2-libmpdec3_2.5.1-2+rpi1_armhf.deb ...
Unpacking libmpdec3:armhf (2.5.1-2+rpi1) ...
Selecting previously unselected package libpython3.9-stdlib:armhf.
Preparing to unpack .../3-libpython3.9-stdlib_3.9.9-2+rpi1_armhf.deb ...
Unpacking libpython3.9-stdlib:armhf (3.9.9-2+rpi1) ...
Selecting previously unselected package python3.9.
Preparing to unpack .../4-python3.9_3.9.9-2+rpi1_armhf.deb ...
Unpacking python3.9 (3.9.9-2+rpi1) ...
Selecting previously unselected package libpython3-stdlib:armhf.
Preparing to unpack .../5-libpython3-stdlib_3.9.7-1_armhf.deb ...
Unpacking libpython3-stdlib:armhf (3.9.7-1) ...
Setting up python3-minimal (3.9.7-1) ...
Selecting previously unselected package python3.
(Reading database ... 14034 files and directories currently installed.)
Preparing to unpack .../000-python3_3.9.7-1_armhf.deb ...
Unpacking python3 (3.9.7-1) ...
Selecting previously unselected package sgml-base.
Preparing to unpack .../001-sgml-base_1.30_all.deb ...
Unpacking sgml-base (1.30) ...
Selecting previously unselected package libmagic-mgc.
Preparing to unpack .../002-libmagic-mgc_1%3a5.41-2_armhf.deb ...
Unpacking libmagic-mgc (1:5.41-2) ...
Selecting previously unselected package libmagic1:armhf.
Preparing to unpack .../003-libmagic1_1%3a5.41-2_armhf.deb ...
Unpacking libmagic1:armhf (1:5.41-2) ...
Selecting previously unselected package file.
Preparing to unpack .../004-file_1%3a5.41-2_armhf.deb ...
Unpacking file (1:5.41-2) ...
Selecting previously unselected package gettext-base.
Preparing to unpack .../005-gettext-base_0.21-4_armhf.deb ...
Unpacking gettext-base (0.21-4) ...
Selecting previously unselected package m4.
Preparing to unpack .../006-m4_1.4.18-5_armhf.deb ...
Unpacking m4 (1.4.18-5) ...
Selecting previously unselected package autoconf.
Preparing to unpack .../007-autoconf_2.71-2_all.deb ...
Unpacking autoconf (2.71-2) ...
Selecting previously unselected package autotools-dev.
Preparing to unpack .../008-autotools-dev_20180224.1+nmu1_all.deb ...
Unpacking autotools-dev (20180224.1+nmu1) ...
Selecting previously unselected package automake.
Preparing to unpack .../009-automake_1%3a1.16.5-1.1_all.deb ...
Unpacking automake (1:1.16.5-1.1) ...
Selecting previously unselected package autopoint.
Preparing to unpack .../010-autopoint_0.21-4_all.deb ...
Unpacking autopoint (0.21-4) ...
Selecting previously unselected package sbcl.
Preparing to unpack .../011-sbcl_2%3a2.1.11-1_armhf.deb ...
Unpacking sbcl (2:2.1.11-1) ...
Selecting previously unselected package buildapp.
Preparing to unpack .../012-buildapp_1.5.6-3_armhf.deb ...
Unpacking buildapp (1.5.6-3) ...
Selecting previously unselected package openssl.
Preparing to unpack .../013-openssl_1.1.1m-1_armhf.deb ...
Unpacking openssl (1.1.1m-1) ...
Selecting previously unselected package ca-certificates.
Preparing to unpack .../014-ca-certificates_20210119_all.deb ...
Unpacking ca-certificates (20210119) ...
Selecting previously unselected package cl-alexandria.
Preparing to unpack .../015-cl-alexandria_20211025.gita67c3a6-1_all.deb ...
Unpacking cl-alexandria (20211025.gita67c3a6-1) ...
Selecting previously unselected package cl-esrap.
Preparing to unpack .../016-cl-esrap_20211008.gitc99c33a-1_all.deb ...
Unpacking cl-esrap (20211008.gitc99c33a-1) ...
Selecting previously unselected package cl-ppcre.
Preparing to unpack .../017-cl-ppcre_20190407.git1ca0cd9-2_all.deb ...
Unpacking cl-ppcre (20190407.git1ca0cd9-2) ...
Selecting previously unselected package cl-abnf.
Preparing to unpack .../018-cl-abnf_20200229.gitba1fbb1-1_all.deb ...
Unpacking cl-abnf (20200229.gitba1fbb1-1) ...
Selecting previously unselected package cl-anaphora.
Preparing to unpack .../019-cl-anaphora_20210111.gitab5f07e-1_all.deb ...
Unpacking cl-anaphora (20210111.gitab5f07e-1) ...
Selecting previously unselected package cl-asdf.
Preparing to unpack .../020-cl-asdf_2%3a3.3.5-1_all.deb ...
Unpacking cl-asdf (2:3.3.5-1) ...
Selecting previously unselected package cl-asdf-finalizers.
Preparing to unpack .../021-cl-asdf-finalizers_20170403-1.1_all.deb ...
Unpacking cl-asdf-finalizers (20170403-1.1) ...
Selecting previously unselected package cl-asdf-system-connections.
Preparing to unpack .../022-cl-asdf-system-connections_20170124-1.1_all.deb ...
Unpacking cl-asdf-system-connections (20170124-1.1) ...
Selecting previously unselected package cl-trivial-features.
Preparing to unpack .../023-cl-trivial-features_20210228.gitf6e8dd7-2_all.deb ...
Unpacking cl-trivial-features (20210228.gitf6e8dd7-2) ...
Selecting previously unselected package cl-trivial-gray-streams.
Preparing to unpack .../024-cl-trivial-gray-streams_20210117.git2b3823e-1_all.deb ...
Unpacking cl-trivial-gray-streams (20210117.git2b3823e-1) ...
Selecting previously unselected package cl-babel.
Preparing to unpack .../025-cl-babel_20200719.gitf892d05-2_all.deb ...
Unpacking cl-babel (20200719.gitf892d05-2) ...
Selecting previously unselected package cl-rt.
Preparing to unpack .../026-cl-rt_20090812.gita6a7503-1_all.deb ...
Unpacking cl-rt (20090812.gita6a7503-1) ...
Selecting previously unselected package cl-kmrcl.
Preparing to unpack .../027-cl-kmrcl_1.111-2_all.deb ...
Unpacking cl-kmrcl (1.111-2) ...
Selecting previously unselected package cl-base64.
Preparing to unpack .../028-cl-base64_3.4.0-1_all.deb ...
Unpacking cl-base64 (3.4.0-1) ...
Selecting previously unselected package cl-bordeaux-threads.
Preparing to unpack .../029-cl-bordeaux-threads_0.8.8-5_all.deb ...
Unpacking cl-bordeaux-threads (0.8.8-5) ...
Selecting previously unselected package libglib2.0-0:armhf.
Preparing to unpack .../030-libglib2.0-0_2.70.2-1_armhf.deb ...
Unpacking libglib2.0-0:armhf (2.70.2-1) ...
Selecting previously unselected package pkg-config.
Preparing to unpack .../031-pkg-config_0.29.2-1_armhf.deb ...
Unpacking pkg-config (0.29.2-1) ...
Selecting previously unselected package libffi-dev:armhf.
Preparing to unpack .../032-libffi-dev_3.4.2-3_armhf.deb ...
Unpacking libffi-dev:armhf (3.4.2-3) ...
Selecting previously unselected package zlib1g-dev:armhf.
Preparing to unpack .../033-zlib1g-dev_1%3a1.2.11.dfsg-2_armhf.deb ...
Unpacking zlib1g-dev:armhf (1:1.2.11.dfsg-2) ...
Selecting previously unselected package cl-cffi.
Preparing to unpack .../034-cl-cffi_1%3a0.24.1-2_all.deb ...
Unpacking cl-cffi (1:0.24.1-2) ...
Selecting previously unselected package cl-chipz.
Preparing to unpack .../035-cl-chipz_20190121.git0f6c9ea-1_all.deb ...
Unpacking cl-chipz (20190121.git0f6c9ea-1) ...
Selecting previously unselected package cl-chunga.
Preparing to unpack .../036-cl-chunga_20200403.gitcb333cd-1_all.deb ...
Unpacking cl-chunga (20200403.gitcb333cd-1) ...
Selecting previously unselected package cl-closer-mop.
Preparing to unpack .../037-cl-closer-mop_2%3a20201029.git91f877a-1_all.deb ...
Unpacking cl-closer-mop (2:20201029.git91f877a-1) ...
Selecting previously unselected package cl-closure-common.
Preparing to unpack .../038-cl-closure-common_20101107-1.1_all.deb ...
Unpacking cl-closure-common (20101107-1.1) ...
Selecting previously unselected package cl-command-line-arguments.
Preparing to unpack .../039-cl-command-line-arguments_20151218-1.1_all.deb ...
Unpacking cl-command-line-arguments (20151218-1.1) ...
Selecting previously unselected package cl-metatilities-base.
Preparing to unpack .../040-cl-metatilities-base_20170403-1.1_all.deb ...
Unpacking cl-metatilities-base (20170403-1.1) ...
Selecting previously unselected package cl-containers.
Preparing to unpack .../041-cl-containers_20170403-1.1_all.deb ...
Unpacking cl-containers (20170403-1.1) ...
Selecting previously unselected package cl-iterate.
Preparing to unpack .../042-cl-iterate_20210519.gitb0f9a9c-1_all.deb ...
Unpacking cl-iterate (20210519.gitb0f9a9c-1) ...
Selecting previously unselected package cl-flexi-streams.
Preparing to unpack .../043-cl-flexi-streams_20210728.git41af5dc-1_all.deb ...
Unpacking cl-flexi-streams (20210728.git41af5dc-1) ...
Selecting previously unselected package cl-unicode.
Preparing to unpack .../044-cl-unicode_20201101.git54bdf2c-1_all.deb ...
Unpacking cl-unicode (20201101.git54bdf2c-1) ...
Selecting previously unselected package cl-named-readtables.
Preparing to unpack .../045-cl-named-readtables_20201221.gitc5689a4-1_all.deb ...
Unpacking cl-named-readtables (20201221.gitc5689a4-1) ...
Selecting previously unselected package cl-interpol.
Preparing to unpack .../046-cl-interpol_20201106.git70a1137-1_all.deb ...
Unpacking cl-interpol (20201106.git70a1137-1) ...
Selecting previously unselected package cl-csv.
Preparing to unpack .../047-cl-csv_20200929.git68ecb5d-1_all.deb ...
Unpacking cl-csv (20200929.git68ecb5d-1) ...
Selecting previously unselected package cl-cxml.
Preparing to unpack .../048-cl-cxml_20110619-2.1_all.deb ...
Unpacking cl-cxml (20110619-2.1) ...
Selecting previously unselected package cl-db3.
Preparing to unpack .../049-cl-db3_20200212-1_all.deb ...
Unpacking cl-db3 (20200212-1) ...
Selecting previously unselected package cl-puri.
Preparing to unpack .../050-cl-puri_1%3a1.5.7.2-1_all.deb ...
Unpacking cl-puri (1:1.5.7.2-1) ...
Selecting previously unselected package cl-split-sequence.
Preparing to unpack .../051-cl-split-sequence_1%3a2.0.1-1_all.deb ...
Unpacking cl-split-sequence (1:2.0.1-1) ...
Selecting previously unselected package cl-usocket.
Preparing to unpack .../052-cl-usocket_0.8.3-2_all.deb ...
Unpacking cl-usocket (0.8.3-2) ...
Selecting previously unselected package cl-trivial-garbage.
Preparing to unpack .../053-cl-trivial-garbage_20200801.git2319892-1_all.deb ...
Unpacking cl-trivial-garbage (20200801.git2319892-1) ...
Selecting previously unselected package cl-plus-ssl.
Preparing to unpack .../054-cl-plus-ssl_20200609.gitff4634a-1_all.deb ...
Unpacking cl-plus-ssl (20200609.gitff4634a-1) ...
Selecting previously unselected package cl-drakma.
Preparing to unpack .../055-cl-drakma_2.0.8-1_all.deb ...
Unpacking cl-drakma (2.0.8-1) ...
Selecting previously unselected package cl-dynamic-classes.
Preparing to unpack .../056-cl-dynamic-classes_20130128-2.1_all.deb ...
Unpacking cl-dynamic-classes (20130128-2.1) ...
Selecting previously unselected package cl-fad.
Preparing to unpack .../057-cl-fad_20200513.git1c15a90-1_all.deb ...
Unpacking cl-fad (20200513.git1c15a90-1) ...
Selecting previously unselected package cl-garbage-pools.
Preparing to unpack .../058-cl-garbage-pools_20130720-1.1_all.deb ...
Unpacking cl-garbage-pools (20130720-1.1) ...
Selecting previously unselected package cl-ieee-floats.
Preparing to unpack .../059-cl-ieee-floats_20170830-1.1_all.deb ...
Unpacking cl-ieee-floats (20170830-1.1) ...
Selecting previously unselected package cl-ironclad.
Preparing to unpack .../060-cl-ironclad_0.56-1_all.deb ...
Unpacking cl-ironclad (0.56-1) ...
Selecting previously unselected package cl-ixf.
Preparing to unpack .../061-cl-ixf_20180228-1.1_all.deb ...
Unpacking cl-ixf (20180228-1.1) ...
Selecting previously unselected package cl-local-time.
Preparing to unpack .../062-cl-local-time_20180228-1.1_all.deb ...
Unpacking cl-local-time (20180228-1.1) ...
Selecting previously unselected package cl-log.
Preparing to unpack .../063-cl-log_1.0.1-1.1_all.deb ...
Unpacking cl-log (1.0.1-1.1) ...
Selecting previously unselected package cl-lparallel.
Preparing to unpack .../064-cl-lparallel_20160825-1.1_all.deb ...
Unpacking cl-lparallel (20160825-1.1) ...
Selecting previously unselected package cl-metabang-bind.
Preparing to unpack .../065-cl-metabang-bind_20200101.git9ab6e64-1_all.deb ...
Unpacking cl-metabang-bind (20200101.git9ab6e64-1) ...
Selecting previously unselected package cl-markdown.
Preparing to unpack .../066-cl-markdown_20101006-2.1_all.deb ...
Unpacking cl-markdown (20101006-2.1) ...
Selecting previously unselected package cl-md5.
Preparing to unpack .../067-cl-md5_1%3a20180224.gitb141260-1_all.deb ...
Unpacking cl-md5 (1:20180224.gitb141260-1) ...
Selecting previously unselected package freetds-common.
Preparing to unpack .../068-freetds-common_1.2.3-1_all.deb ...
Unpacking freetds-common (1.2.3-1) ...
Selecting previously unselected package libct4:armhf.
Preparing to unpack .../069-libct4_1.2.3-1_armhf.deb ...
Unpacking libct4:armhf (1.2.3-1) ...
Selecting previously unselected package libsybdb5:armhf.
Preparing to unpack .../070-libsybdb5_1.2.3-1_armhf.deb ...
Unpacking libsybdb5:armhf (1.2.3-1) ...
Selecting previously unselected package freetds-dev.
Preparing to unpack .../071-freetds-dev_1.2.3-1_armhf.deb ...
Unpacking freetds-dev (1.2.3-1) ...
Selecting previously unselected package cl-mssql.
Preparing to unpack .../072-cl-mssql_20180228-1.1_all.deb ...
Unpacking cl-mssql (20180228-1.1) ...
Selecting previously unselected package cl-mustache.
Preparing to unpack .../073-cl-mustache_0.12.1-9-g684f227-1.1_all.deb ...
Unpacking cl-mustache (0.12.1-9-g684f227-1.1) ...
Selecting previously unselected package cl-parse-number.
Preparing to unpack .../074-cl-parse-number_1.7-1.1_all.deb ...
Unpacking cl-parse-number (1.7-1.1) ...
Selecting previously unselected package cl-postgres.
Preparing to unpack .../075-cl-postgres_20180430-2_all.deb ...
Unpacking cl-postgres (20180430-2) ...
Selecting previously unselected package cl-s-sql.
Preparing to unpack .../076-cl-s-sql_20180430-2_all.deb ...
Unpacking cl-s-sql (20180430-2) ...
Selecting previously unselected package cl-postmodern.
Preparing to unpack .../077-cl-postmodern_20180430-2_all.deb ...
Unpacking cl-postmodern (20180430-2) ...
Selecting previously unselected package cl-py-configparser.
Preparing to unpack .../078-cl-py-configparser_20170830-1.1_all.deb ...
Unpacking cl-py-configparser (20170830-1.1) ...
Selecting previously unselected package cl-qmynd.
Preparing to unpack .../079-cl-qmynd_20180131-1.1_all.deb ...
Unpacking cl-qmynd (20180131-1.1) ...
Selecting previously unselected package cl-quri.
Preparing to unpack .../080-cl-quri_20150804-1.1_all.deb ...
Unpacking cl-quri (20150804-1.1) ...
Selecting previously unselected package cl-simple-date.
Preparing to unpack .../081-cl-simple-date_20180430-2_all.deb ...
Unpacking cl-simple-date (20180430-2) ...
Selecting previously unselected package cl-sqlite.
Preparing to unpack .../082-cl-sqlite_20130615-2.1_all.deb ...
Unpacking cl-sqlite (20130615-2.1) ...
Selecting previously unselected package cl-trivial-backtrace.
Preparing to unpack .../083-cl-trivial-backtrace_20200511.git6eb65bd-1_all.deb ...
Unpacking cl-trivial-backtrace (20200511.git6eb65bd-1) ...
Selecting previously unselected package cl-trivial-utf-8.
Preparing to unpack .../084-cl-trivial-utf-8_20111001-1.1_all.deb ...
Unpacking cl-trivial-utf-8 (20111001-1.1) ...
Selecting previously unselected package cl-utilities.
Preparing to unpack .../085-cl-utilities_1.2.4-3.2_all.deb ...
Unpacking cl-utilities (1.2.4-3.2) ...
Selecting previously unselected package cl-uuid.
Preparing to unpack .../086-cl-uuid_20130813-1.1_all.deb ...
Unpacking cl-uuid (20130813-1.1) ...
Selecting previously unselected package cl-yason.
Preparing to unpack .../087-cl-yason_0.7.6-1.1_all.deb ...
Unpacking cl-yason (0.7.6-1.1) ...
Selecting previously unselected package cl-zs3.
Preparing to unpack .../088-cl-zs3_1.3.1-1.1_all.deb ...
Unpacking cl-zs3 (1.3.1-1.1) ...
Selecting previously unselected package libdebhelper-perl.
Preparing to unpack .../089-libdebhelper-perl_13.5.2_all.deb ...
Unpacking libdebhelper-perl (13.5.2) ...
Selecting previously unselected package libtool.
Preparing to unpack .../090-libtool_2.4.6-15_all.deb ...
Unpacking libtool (2.4.6-15) ...
Selecting previously unselected package dh-autoreconf.
Preparing to unpack .../091-dh-autoreconf_20_all.deb ...
Unpacking dh-autoreconf (20) ...
Selecting previously unselected package libarchive-zip-perl.
Preparing to unpack .../092-libarchive-zip-perl_1.68-1_all.deb ...
Unpacking libarchive-zip-perl (1.68-1) ...
Selecting previously unselected package libsub-override-perl.
Preparing to unpack .../093-libsub-override-perl_0.09-2_all.deb ...
Unpacking libsub-override-perl (0.09-2) ...
Selecting previously unselected package libfile-stripnondeterminism-perl.
Preparing to unpack .../094-libfile-stripnondeterminism-perl_1.13.0-1_all.deb ...
Unpacking libfile-stripnondeterminism-perl (1.13.0-1) ...
Selecting previously unselected package dh-strip-nondeterminism.
Preparing to unpack .../095-dh-strip-nondeterminism_1.13.0-1_all.deb ...
Unpacking dh-strip-nondeterminism (1.13.0-1) ...
Selecting previously unselected package libelf1:armhf.
Preparing to unpack .../096-libelf1_0.186-1_armhf.deb ...
Unpacking libelf1:armhf (0.186-1) ...
Selecting previously unselected package dwz.
Preparing to unpack .../097-dwz_0.14-1_armhf.deb ...
Unpacking dwz (0.14-1) ...
Selecting previously unselected package libicu67:armhf.
Preparing to unpack .../098-libicu67_67.1-7_armhf.deb ...
Unpacking libicu67:armhf (67.1-7) ...
Selecting previously unselected package libxml2:armhf.
Preparing to unpack .../099-libxml2_2.9.12+dfsg-5_armhf.deb ...
Unpacking libxml2:armhf (2.9.12+dfsg-5) ...
Selecting previously unselected package gettext.
Preparing to unpack .../100-gettext_0.21-4_armhf.deb ...
Unpacking gettext (0.21-4) ...
Selecting previously unselected package intltool-debian.
Preparing to unpack .../101-intltool-debian_0.35.0+20060710.5_all.deb ...
Unpacking intltool-debian (0.35.0+20060710.5) ...
Selecting previously unselected package po-debconf.
Preparing to unpack .../102-po-debconf_1.0.21+nmu1_all.deb ...
Unpacking po-debconf (1.0.21+nmu1) ...
Selecting previously unselected package debhelper.
Preparing to unpack .../103-debhelper_13.5.2_all.deb ...
Unpacking debhelper (13.5.2) ...
Selecting previously unselected package xml-core.
Preparing to unpack .../104-xml-core_0.18+nmu1_all.deb ...
Unpacking xml-core (0.18+nmu1) ...
Selecting previously unselected package docutils-common.
Preparing to unpack .../105-docutils-common_0.17.1+dfsg-2_all.deb ...
Unpacking docutils-common (0.17.1+dfsg-2) ...
Selecting previously unselected package fonts-font-awesome.
Preparing to unpack .../106-fonts-font-awesome_5.0.10+really4.7.0~dfsg-4.1_all.deb ...
Unpacking fonts-font-awesome (5.0.10+really4.7.0~dfsg-4.1) ...
Selecting previously unselected package help2man.
Preparing to unpack .../107-help2man_1.48.5_armhf.deb ...
Unpacking help2man (1.48.5) ...
Selecting previously unselected package libjs-jquery.
Preparing to unpack .../108-libjs-jquery_3.5.1+dfsg+~3.5.5-8_all.deb ...
Unpacking libjs-jquery (3.5.1+dfsg+~3.5.5-8) ...
Selecting previously unselected package libjs-underscore.
Preparing to unpack .../109-libjs-underscore_1.9.1~dfsg-4_all.deb ...
Unpacking libjs-underscore (1.9.1~dfsg-4) ...
Selecting previously unselected package libjs-sphinxdoc.
Preparing to unpack .../110-libjs-sphinxdoc_4.3.2-1_all.deb ...
Unpacking libjs-sphinxdoc (4.3.2-1) ...
Selecting previously unselected package python-babel-localedata.
Preparing to unpack .../111-python-babel-localedata_2.8.0+dfsg.1-7_all.deb ...
Unpacking python-babel-localedata (2.8.0+dfsg.1-7) ...
Selecting previously unselected package python3-alabaster.
Preparing to unpack .../112-python3-alabaster_0.7.12-1_all.deb ...
Unpacking python3-alabaster (0.7.12-1) ...
Selecting previously unselected package python3-pkg-resources.
Preparing to unpack .../113-python3-pkg-resources_58.2.0-1_all.deb ...
Unpacking python3-pkg-resources (58.2.0-1) ...
Selecting previously unselected package python3-tz.
Preparing to unpack .../114-python3-tz_2021.3-1_all.deb ...
Unpacking python3-tz (2021.3-1) ...
Selecting previously unselected package python3-babel.
Preparing to unpack .../115-python3-babel_2.8.0+dfsg.1-7_all.deb ...
Unpacking python3-babel (2.8.0+dfsg.1-7) ...
Selecting previously unselected package python3-certifi.
Preparing to unpack .../116-python3-certifi_2020.6.20-1_all.deb ...
Unpacking python3-certifi (2020.6.20-1) ...
Selecting previously unselected package python3-chardet.
Preparing to unpack .../117-python3-chardet_4.0.0-1_all.deb ...
Unpacking python3-chardet (4.0.0-1) ...
Selecting previously unselected package python3-lib2to3.
Preparing to unpack .../118-python3-lib2to3_3.9.9-3_all.deb ...
Unpacking python3-lib2to3 (3.9.9-3) ...
Selecting previously unselected package python3-distutils.
Preparing to unpack .../119-python3-distutils_3.9.9-3_all.deb ...
Unpacking python3-distutils (3.9.9-3) ...
Selecting previously unselected package python3-roman.
Preparing to unpack .../120-python3-roman_3.3-1_all.deb ...
Unpacking python3-roman (3.3-1) ...
Selecting previously unselected package python3-docutils.
Preparing to unpack .../121-python3-docutils_0.17.1+dfsg-2_all.deb ...
Unpacking python3-docutils (0.17.1+dfsg-2) ...
Selecting previously unselected package python3-idna.
Preparing to unpack .../122-python3-idna_3.2-2_all.deb ...
Unpacking python3-idna (3.2-2) ...
Selecting previously unselected package python3-imagesize.
Preparing to unpack .../123-python3-imagesize_1.3.0-1_all.deb ...
Unpacking python3-imagesize (1.3.0-1) ...
Selecting previously unselected package python3-markupsafe.
Preparing to unpack .../124-python3-markupsafe_2.0.1-2_armhf.deb ...
Unpacking python3-markupsafe (2.0.1-2) ...
Selecting previously unselected package python3-jinja2.
Preparing to unpack .../125-python3-jinja2_3.0.1-2_all.deb ...
Unpacking python3-jinja2 (3.0.1-2) ...
Selecting previously unselected package python3-pyparsing.
Preparing to unpack .../126-python3-pyparsing_2.4.7-1_all.deb ...
Unpacking python3-pyparsing (2.4.7-1) ...
Selecting previously unselected package python3-packaging.
Preparing to unpack .../127-python3-packaging_21.3-1_all.deb ...
Unpacking python3-packaging (21.3-1) ...
Selecting previously unselected package python3-pygments.
Preparing to unpack .../128-python3-pygments_2.7.1+dfsg-2.1_all.deb ...
Unpacking python3-pygments (2.7.1+dfsg-2.1) ...
Selecting previously unselected package python3-six.
Preparing to unpack .../129-python3-six_1.16.0-2_all.deb ...
Unpacking python3-six (1.16.0-2) ...
Selecting previously unselected package python3-urllib3.
Preparing to unpack .../130-python3-urllib3_1.26.5-1~exp1_all.deb ...
Unpacking python3-urllib3 (1.26.5-1~exp1) ...
Selecting previously unselected package python3-requests.
Preparing to unpack .../131-python3-requests_2.25.1+dfsg-2_all.deb ...
Unpacking python3-requests (2.25.1+dfsg-2) ...
Selecting previously unselected package python3-snowballstemmer.
Preparing to unpack .../132-python3-snowballstemmer_2.2.0-1_all.deb ...
Unpacking python3-snowballstemmer (2.2.0-1) ...
Selecting previously unselected package sphinx-common.
Preparing to unpack .../133-sphinx-common_4.3.2-1_all.deb ...
Unpacking sphinx-common (4.3.2-1) ...
Selecting previously unselected package python3-sphinx.
Preparing to unpack .../134-python3-sphinx_4.3.2-1_all.deb ...
Unpacking python3-sphinx (4.3.2-1) ...
Selecting previously unselected package sphinx-rtd-theme-common.
Preparing to unpack .../135-sphinx-rtd-theme-common_1.0.0+dfsg-1_all.deb ...
Unpacking sphinx-rtd-theme-common (1.0.0+dfsg-1) ...
Selecting previously unselected package python3-sphinx-rtd-theme.
Preparing to unpack .../136-python3-sphinx-rtd-theme_1.0.0+dfsg-1_all.deb ...
Unpacking python3-sphinx-rtd-theme (1.0.0+dfsg-1) ...
Selecting previously unselected package sbuild-build-depends-pgloader-dummy.
Preparing to unpack .../137-sbuild-build-depends-pgloader-dummy_0.invalid.0_armhf.deb ...
Unpacking sbuild-build-depends-pgloader-dummy (0.invalid.0) ...
Setting up media-types (4.0.0) ...
Setting up libpipeline1:armhf (1.5.4-1) ...
Setting up cl-trivial-utf-8 (20111001-1.1) ...
Setting up fonts-lato (2.0-2.1) ...
Setting up cl-trivial-garbage (20200801.git2319892-1) ...
Setting up cl-garbage-pools (20130720-1.1) ...
Setting up bsdextrautils (2.37.2-4) ...
update-alternatives: using /usr/bin/write.ul to provide /usr/bin/write (write) in auto mode
Setting up cl-closer-mop (2:20201029.git91f877a-1) ...
Setting up libicu67:armhf (67.1-7) ...
Setting up libmagic-mgc (1:5.41-2) ...
Setting up cl-metabang-bind (20200101.git9ab6e64-1) ...
Setting up gawk (1:5.1.0-1) ...
Setting up cl-asdf (2:3.3.5-1) ...
Setting up libarchive-zip-perl (1.68-1) ...
Setting up cl-closure-common (20101107-1.1) ...
Setting up libglib2.0-0:armhf (2.70.2-1) ...
No schema files found: doing nothing.
Setting up cl-parse-number (1.7-1.1) ...
Setting up libdebhelper-perl (13.5.2) ...
Setting up cl-log (1.0.1-1.1) ...
Setting up cl-puri (1:1.5.7.2-1) ...
Setting up cl-simple-date (20180430-2) ...
Setting up cl-quri (20150804-1.1) ...
Setting up libmagic1:armhf (1:5.41-2) ...
Setting up gettext-base (0.21-4) ...
Setting up cl-named-readtables (20201221.gitc5689a4-1) ...
Setting up m4 (1.4.18-5) ...
Setting up cl-trivial-features (20210228.gitf6e8dd7-2) ...
Setting up cl-trivial-backtrace (20200511.git6eb65bd-1) ...
Setting up file (1:5.41-2) ...
Setting up libffi-dev:armhf (3.4.2-3) ...
Setting up python-babel-localedata (2.8.0+dfsg.1-7) ...
Setting up cl-split-sequence (1:2.0.1-1) ...
Setting up cl-metatilities-base (20170403-1.1) ...
Setting up cl-trivial-gray-streams (20210117.git2b3823e-1) ...
Setting up help2man (1.48.5) ...
Setting up cl-cxml (20110619-2.1) ...
Setting up cl-asdf-finalizers (20170403-1.1) ...
Setting up autotools-dev (20180224.1+nmu1) ...
Setting up cl-yason (0.7.6-1.1) ...
Setting up cl-mustache (0.12.1-9-g684f227-1.1) ...
Setting up cl-dynamic-classes (20130128-2.1) ...
Setting up cl-command-line-arguments (20151218-1.1) ...
Setting up autopoint (0.21-4) ...
Setting up pkg-config (0.29.2-1) ...
Setting up autoconf (2.71-2) ...
Setting up cl-chipz (20190121.git0f6c9ea-1) ...
Setting up sbcl (2:2.1.11-1) ...
Setting up zlib1g-dev:armhf (1:1.2.11.dfsg-2) ...
Setting up cl-chunga (20200403.gitcb333cd-1) ...
Setting up libuchardet0:armhf (0.0.7-1) ...
Setting up libmpdec3:armhf (2.5.1-2+rpi1) ...
Setting up cl-alexandria (20211025.gita67c3a6-1) ...
Setting up libsub-override-perl (0.09-2) ...
Setting up sgml-base (1.30) ...
Setting up cl-iterate (20210519.gitb0f9a9c-1) ...
Setting up cl-db3 (20200212-1) ...
Setting up cl-utilities (1.2.4-3.2) ...
Setting up cl-rt (20090812.gita6a7503-1) ...
Setting up cl-asdf-system-connections (20170124-1.1) ...
Setting up freetds-common (1.2.3-1) ...
Setting up libjs-jquery (3.5.1+dfsg+~3.5.5-8) ...
Setting up cl-py-configparser (20170830-1.1) ...
Setting up cl-ppcre (20190407.git1ca0cd9-2) ...
Setting up cl-anaphora (20210111.gitab5f07e-1) ...
Setting up openssl (1.1.1m-1) ...
Setting up cl-ieee-floats (20170830-1.1) ...
Setting up libelf1:armhf (0.186-1) ...
Setting up libxml2:armhf (2.9.12+dfsg-5) ...
Setting up fonts-font-awesome (5.0.10+really4.7.0~dfsg-4.1) ...
Setting up sphinx-rtd-theme-common (1.0.0+dfsg-1) ...
Setting up libpython3.9-stdlib:armhf (3.9.9-2+rpi1) ...
Setting up libpython3-stdlib:armhf (3.9.7-1) ...
Setting up libjs-underscore (1.9.1~dfsg-4) ...
Setting up buildapp (1.5.6-3) ...
Setting up automake (1:1.16.5-1.1) ...
update-alternatives: using /usr/bin/automake-1.16 to provide /usr/bin/automake (automake) in auto mode
Setting up libfile-stripnondeterminism-perl (1.13.0-1) ...
Setting up cl-containers (20170403-1.1) ...
Setting up gettext (0.21-4) ...
Setting up cl-flexi-streams (20210728.git41af5dc-1) ...
Setting up libtool (2.4.6-15) ...
Setting up cl-ixf (20180228-1.1) ...
Setting up libsybdb5:armhf (1.2.3-1) ...
Setting up cl-babel (20200719.gitf892d05-2) ...
Setting up cl-bordeaux-threads (0.8.8-5) ...
Setting up intltool-debian (0.35.0+20060710.5) ...
Setting up dh-autoreconf (20) ...
Setting up ca-certificates (20210119) ...
Updating certificates in /etc/ssl/certs...
129 added, 0 removed; done.
Setting up libct4:armhf (1.2.3-1) ...
Setting up cl-kmrcl (1.111-2) ...
Setting up cl-lparallel (20160825-1.1) ...
Setting up cl-usocket (0.8.3-2) ...
Setting up libjs-sphinxdoc (4.3.2-1) ...
Setting up cl-md5 (1:20180224.gitb141260-1) ...
Setting up dh-strip-nondeterminism (1.13.0-1) ...
Setting up dwz (0.14-1) ...
Setting up cl-esrap (20211008.gitc99c33a-1) ...
Setting up groff-base (1.22.4-7) ...
Setting up xml-core (0.18+nmu1) ...
Setting up cl-markdown (20101006-2.1) ...
Setting up cl-cffi (1:0.24.1-2) ...
Setting up cl-unicode (20201101.git54bdf2c-1) ...
Setting up cl-abnf (20200229.gitba1fbb1-1) ...
Setting up python3.9 (3.9.9-2+rpi1) ...
Setting up cl-base64 (3.4.0-1) ...
Setting up cl-ironclad (0.56-1) ...
Setting up cl-interpol (20201106.git70a1137-1) ...
Setting up freetds-dev (1.2.3-1) ...
Setting up cl-fad (20200513.git1c15a90-1) ...
Setting up po-debconf (1.0.21+nmu1) ...
Setting up cl-csv (20200929.git68ecb5d-1) ...
Setting up python3 (3.9.7-1) ...
Setting up man-db (2.9.4-2) ...
Not building database; man-db/auto-update is not 'true'.
Setting up python3-markupsafe (2.0.1-2) ...
Setting up python3-tz (2021.3-1) ...
Setting up cl-mssql (20180228-1.1) ...
Setting up python3-six (1.16.0-2) ...
Setting up python3-roman (3.3-1) ...
Setting up cl-qmynd (20180131-1.1) ...
Setting up cl-plus-ssl (20200609.gitff4634a-1) ...
Setting up python3-pyparsing (2.4.7-1) ...
Setting up python3-certifi (2020.6.20-1) ...
Setting up python3-snowballstemmer (2.2.0-1) ...
Setting up cl-sqlite (20130615-2.1) ...
Setting up sphinx-common (4.3.2-1) ...
Setting up python3-idna (3.2-2) ...
Setting up cl-postgres (20180430-2) ...
Setting up cl-drakma (2.0.8-1) ...
Setting up python3-urllib3 (1.26.5-1~exp1) ...
Setting up cl-uuid (20130813-1.1) ...
Setting up python3-lib2to3 (3.9.9-3) ...
Setting up python3-imagesize (1.3.0-1) ...
Setting up python3-pkg-resources (58.2.0-1) ...
Setting up python3-distutils (3.9.9-3) ...
Setting up cl-local-time (20180228-1.1) ...
Setting up python3-babel (2.8.0+dfsg.1-7) ...
update-alternatives: using /usr/bin/pybabel-python3 to provide /usr/bin/pybabel (pybabel) in auto mode
Setting up python3-alabaster (0.7.12-1) ...
Setting up debhelper (13.5.2) ...
Setting up cl-zs3 (1.3.1-1.1) ...
Setting up python3-jinja2 (3.0.1-2) ...
Setting up python3-pygments (2.7.1+dfsg-2.1) ...
Setting up python3-packaging (21.3-1) ...
Setting up python3-chardet (4.0.0-1) ...
Setting up cl-s-sql (20180430-2) ...
Setting up python3-requests (2.25.1+dfsg-2) ...
Setting up cl-postmodern (20180430-2) ...
Processing triggers for libc-bin (2.32-4+rpi1) ...
Processing triggers for sgml-base (1.30) ...
Setting up docutils-common (0.17.1+dfsg-2) ...
Processing triggers for sgml-base (1.30) ...
Setting up python3-docutils (0.17.1+dfsg-2) ...
Setting up python3-sphinx (4.3.2-1) ...
Setting up python3-sphinx-rtd-theme (1.0.0+dfsg-1) ...
Setting up sbuild-build-depends-pgloader-dummy (0.invalid.0) ...
Processing triggers for ca-certificates (20210119) ...
Updating certificates in /etc/ssl/certs...
0 added, 0 removed; done.
Running hooks in /etc/ca-certificates/update.d...
done.
W: No sandbox user '_apt' on the system, can not drop privileges
+------------------------------------------------------------------------------+
| Build environment |
+------------------------------------------------------------------------------+
Kernel: Linux 4.15.0-163-generic armhf (armv8l)
Toolchain package versions: binutils_2.37-5+rpi1 dpkg-dev_1.20.9+rpi1 g++-11_11.2.0-10+rpi1 gcc-11_11.2.0-10+rpi1 libc6-dev_2.32-4+rpi1 libstdc++-11-dev_11.2.0-10+rpi1 libstdc++6_11.2.0-10+rpi1 linux-libc-dev_5.14.16-1+rpi1
Package versions: adduser_3.118 apt_2.3.12 autoconf_2.71-2 automake_1:1.16.5-1.1 autopoint_0.21-4 autotools-dev_20180224.1+nmu1 base-files_12+rpi1 base-passwd_3.5.52 bash_5.1-3.1 binutils_2.37-5+rpi1 binutils-arm-linux-gnueabihf_2.37-5+rpi1 binutils-common_2.37-5+rpi1 bsdextrautils_2.37.2-4 bsdutils_1:2.37.2-4 build-essential_12.9 buildapp_1.5.6-3 bzip2_1.0.8-4 ca-certificates_20210119 cl-abnf_20200229.gitba1fbb1-1 cl-alexandria_20211025.gita67c3a6-1 cl-anaphora_20210111.gitab5f07e-1 cl-asdf_2:3.3.5-1 cl-asdf-finalizers_20170403-1.1 cl-asdf-system-connections_20170124-1.1 cl-babel_20200719.gitf892d05-2 cl-base64_3.4.0-1 cl-bordeaux-threads_0.8.8-5 cl-cffi_1:0.24.1-2 cl-chipz_20190121.git0f6c9ea-1 cl-chunga_20200403.gitcb333cd-1 cl-closer-mop_2:20201029.git91f877a-1 cl-closure-common_20101107-1.1 cl-command-line-arguments_20151218-1.1 cl-containers_20170403-1.1 cl-csv_20200929.git68ecb5d-1 cl-cxml_20110619-2.1 cl-db3_20200212-1 cl-drakma_2.0.8-1 cl-dynamic-classes_20130128-2.1 cl-esrap_20211008.gitc99c33a-1 cl-fad_20200513.git1c15a90-1 cl-flexi-streams_20210728.git41af5dc-1 cl-garbage-pools_20130720-1.1 cl-ieee-floats_20170830-1.1 cl-interpol_20201106.git70a1137-1 cl-ironclad_0.56-1 cl-iterate_20210519.gitb0f9a9c-1 cl-ixf_20180228-1.1 cl-kmrcl_1.111-2 cl-local-time_20180228-1.1 cl-log_1.0.1-1.1 cl-lparallel_20160825-1.1 cl-markdown_20101006-2.1 cl-md5_1:20180224.gitb141260-1 cl-metabang-bind_20200101.git9ab6e64-1 cl-metatilities-base_20170403-1.1 cl-mssql_20180228-1.1 cl-mustache_0.12.1-9-g684f227-1.1 cl-named-readtables_20201221.gitc5689a4-1 cl-parse-number_1.7-1.1 cl-plus-ssl_20200609.gitff4634a-1 cl-postgres_20180430-2 cl-postmodern_20180430-2 cl-ppcre_20190407.git1ca0cd9-2 cl-puri_1:1.5.7.2-1 cl-py-configparser_20170830-1.1 cl-qmynd_20180131-1.1 cl-quri_20150804-1.1 cl-rt_20090812.gita6a7503-1 cl-s-sql_20180430-2 cl-simple-date_20180430-2 cl-split-sequence_1:2.0.1-1 cl-sqlite_20130615-2.1 cl-trivial-backtrace_20200511.git6eb65bd-1 cl-trivial-features_20210228.gitf6e8dd7-2 cl-trivial-garbage_20200801.git2319892-1 cl-trivial-gray-streams_20210117.git2b3823e-1 cl-trivial-utf-8_20111001-1.1 cl-unicode_20201101.git54bdf2c-1 cl-usocket_0.8.3-2 cl-utilities_1.2.4-3.2 cl-uuid_20130813-1.1 cl-yason_0.7.6-1.1 cl-zs3_1.3.1-1.1 coreutils_8.32-4.1 cpp_4:11.2.0-2+rpi1 cpp-11_11.2.0-10+rpi1 dash_0.5.11+git20210903+057cd650a4ed-3 debconf_1.5.79 debhelper_13.5.2 debianutils_4.11.2 dh-autoreconf_20 dh-strip-nondeterminism_1.13.0-1 diffutils_1:3.7-5 dirmngr_2.2.27-2 docutils-common_0.17.1+dfsg-2 dpkg_1.20.9+rpi1 dpkg-dev_1.20.9+rpi1 dwz_0.14-1 e2fsprogs_1.46.4-1 fakeroot_1.25.3-1.1 file_1:5.41-2 findutils_4.8.0-1 fonts-font-awesome_5.0.10+really4.7.0~dfsg-4.1 fonts-lato_2.0-2.1 freetds-common_1.2.3-1 freetds-dev_1.2.3-1 g++_4:11.2.0-2+rpi1 g++-11_11.2.0-10+rpi1 gawk_1:5.1.0-1 gcc_4:11.2.0-2+rpi1 gcc-11_11.2.0-10+rpi1 gcc-11-base_11.2.0-10+rpi1 gcc-7-base_7.5.0-6+rpi1+b2 gcc-8-base_8.4.0-7+rpi1 gcc-9-base_9.4.0-2+rpi1 gettext_0.21-4 gettext-base_0.21-4 gnupg_2.2.27-2 gnupg-l10n_2.2.27-2 gnupg-utils_2.2.27-2 gpg_2.2.27-2 gpg-agent_2.2.27-2 gpg-wks-client_2.2.27-2 gpg-wks-server_2.2.27-2 gpgconf_2.2.27-2 gpgsm_2.2.27-2 gpgv_2.2.27-2 grep_3.7-1 groff-base_1.22.4-7 gzip_1.10-4 help2man_1.48.5 hostname_3.23 init-system-helpers_1.60 intltool-debian_0.35.0+20060710.5 libacl1_2.3.1-1 libapt-pkg6.0_2.3.12 libarchive-zip-perl_1.68-1 libasan6_11.2.0-10+rpi1 libassuan0_2.5.5-1 libatomic1_11.2.0-10+rpi1 libattr1_1:2.5.1-1 libaudit-common_1:3.0.6-1 libaudit1_1:3.0.6-1 libbinutils_2.37-5+rpi1 libblkid1_2.37.2-4 libbz2-1.0_1.0.8-4 libc-bin_2.32-4+rpi1 libc-dev-bin_2.32-4+rpi1 libc6_2.32-4+rpi1 libc6-dev_2.32-4+rpi1 libcap-ng0_0.7.9-2.2+b1 libcap2_1:2.44-1 libcc1-0_11.2.0-10+rpi1 libcom-err2_1.46.4-1 libcrypt-dev_1:4.4.26-1 libcrypt1_1:4.4.26-1 libct4_1.2.3-1 libctf-nobfd0_2.37-5+rpi1 libctf0_2.37-5+rpi1 libdb5.3_5.3.28+dfsg1-0.8 libdebconfclient0_0.261 libdebhelper-perl_13.5.2 libdpkg-perl_1.20.9+rpi1 libelf1_0.186-1 libexpat1_2.4.1-3 libext2fs2_1.46.4-1 libfakeroot_1.25.3-1.1 libffi-dev_3.4.2-3 libffi8_3.4.2-3 libfile-stripnondeterminism-perl_1.13.0-1 libgcc-11-dev_11.2.0-10+rpi1 libgcc-s1_11.2.0-10+rpi1 libgcrypt20_1.9.4-3 libgdbm-compat4_1.22-1 libgdbm6_1.22-1 libglib2.0-0_2.70.2-1 libgmp10_2:6.2.1+dfsg-3 libgnutls30_3.7.2-2 libgomp1_11.2.0-10+rpi1 libgpg-error0_1.42-3 libgssapi-krb5-2_1.18.3-7 libhogweed6_3.7.3-1 libicu67_67.1-7 libidn2-0_2.3.2-2 libisl23_0.24-2 libjs-jquery_3.5.1+dfsg+~3.5.5-8 libjs-sphinxdoc_4.3.2-1 libjs-underscore_1.9.1~dfsg-4 libk5crypto3_1.18.3-7 libkeyutils1_1.6.1-2 libkrb5-3_1.18.3-7 libkrb5support0_1.18.3-7 libksba8_1.6.0-2 libldap-2.4-2_2.4.59+dfsg-1 liblocale-gettext-perl_1.07-4+b1 liblz4-1_1.9.3-2 liblzma5_5.2.5-2 libmagic-mgc_1:5.41-2 libmagic1_1:5.41-2 libmount1_2.37.2-4 libmpc3_1.2.1-1 libmpdec3_2.5.1-2+rpi1 libmpfr6_4.1.0-3 libncursesw6_6.3-1 libnettle8_3.7.3-1 libnpth0_1.6-3 libnsl-dev_1.3.0-2 libnsl2_1.3.0-2 libp11-kit0_0.24.0-5 libpam-modules_1.4.0-10 libpam-modules-bin_1.4.0-10 libpam-runtime_1.4.0-10 libpam0g_1.4.0-10 libpcre2-8-0_10.39-3 libpcre3_2:8.39-13 libperl5.32_5.32.1-6 libpipeline1_1.5.4-1 libpython3-stdlib_3.9.7-1 libpython3.9-minimal_3.9.9-2+rpi1 libpython3.9-stdlib_3.9.9-2+rpi1 libreadline8_8.1-2 libsasl2-2_2.1.27+dfsg2-2 libsasl2-modules-db_2.1.27+dfsg2-2 libseccomp2_2.5.3-2+rpi1 libselinux1_3.3-1 libsemanage-common_3.3-1 libsemanage2_3.3-1 libsepol1_3.1-1 libsepol2_3.3-1 libsigsegv2_2.13-1 libsmartcols1_2.37.2-4 libsqlite3-0_3.36.0-2 libss2_1.46.4-1 libssl1.1_1.1.1l-1 libstdc++-11-dev_11.2.0-10+rpi1 libstdc++6_11.2.0-10+rpi1 libsub-override-perl_0.09-2 libsybdb5_1.2.3-1 libsystemd0_249.7-1+rpi1 libtasn1-6_4.18.0-4 libtext-charwidth-perl_0.04-10+b1 libtext-iconv-perl_1.7-7+b1 libtinfo6_6.3-1 libtirpc-common_1.3.2-2 libtirpc-dev_1.3.2-2 libtirpc3_1.3.2-2 libtool_2.4.6-15 libubsan1_11.2.0-10+rpi1 libuchardet0_0.0.7-1 libudev1_249.7-1+rpi1 libunistring2_0.9.10-6 libuuid1_2.37.2-4 libxml2_2.9.12+dfsg-5 libxxhash0_0.8.0-2+rpi1 libzstd1_1.4.8+dfsg-3+rpi1 linux-libc-dev_5.14.16-1+rpi1 login_1:4.8.1-2 logsave_1.46.4-1 lsb-base_11.1.0+rpi1 m4_1.4.18-5 make_4.3-4.1 man-db_2.9.4-2 mawk_1.3.4.20200120-2 media-types_4.0.0 mount_2.37.2-4 ncurses-base_6.3-1 ncurses-bin_6.3-1 netbase_6.3 openssl_1.1.1m-1 passwd_1:4.8.1-2 patch_2.7.6-7 perl_5.32.1-6 perl-base_5.32.1-6 perl-modules-5.32_5.32.1-6 pinentry-curses_1.1.0-4 pkg-config_0.29.2-1 po-debconf_1.0.21+nmu1 python-babel-localedata_2.8.0+dfsg.1-7 python3_3.9.7-1 python3-alabaster_0.7.12-1 python3-babel_2.8.0+dfsg.1-7 python3-certifi_2020.6.20-1 python3-chardet_4.0.0-1 python3-distutils_3.9.9-3 python3-docutils_0.17.1+dfsg-2 python3-idna_3.2-2 python3-imagesize_1.3.0-1 python3-jinja2_3.0.1-2 python3-lib2to3_3.9.9-3 python3-markupsafe_2.0.1-2 python3-minimal_3.9.7-1 python3-packaging_21.3-1 python3-pkg-resources_58.2.0-1 python3-pygments_2.7.1+dfsg-2.1 python3-pyparsing_2.4.7-1 python3-requests_2.25.1+dfsg-2 python3-roman_3.3-1 python3-six_1.16.0-2 python3-snowballstemmer_2.2.0-1 python3-sphinx_4.3.2-1 python3-sphinx-rtd-theme_1.0.0+dfsg-1 python3-tz_2021.3-1 python3-urllib3_1.26.5-1~exp1 python3.9_3.9.9-2+rpi1 python3.9-minimal_3.9.9-2+rpi1 raspbian-archive-keyring_20120528.2 readline-common_8.1-2 rpcsvc-proto_1.4.2-4 sbcl_2:2.1.11-1 sbuild-build-depends-core-dummy_0.invalid.0 sbuild-build-depends-pgloader-dummy_0.invalid.0 sed_4.8-1 sensible-utils_0.0.17 sgml-base_1.30 sphinx-common_4.3.2-1 sphinx-rtd-theme-common_1.0.0+dfsg-1 sysvinit-utils_3.00-1 tar_1.34+dfsg-1 tzdata_2021e-1 util-linux_2.37.2-4 xml-core_0.18+nmu1 xz-utils_5.2.5-2 zlib1g_1:1.2.11.dfsg-2 zlib1g-dev_1:1.2.11.dfsg-2
+------------------------------------------------------------------------------+
| Build |
+------------------------------------------------------------------------------+
Unpack source
-------------
gpgv: unknown type of key resource 'trustedkeys.kbx'
gpgv: keyblock resource '/tmp/dpkg-verify-sig.Ggvxo2yS/trustedkeys.kbx': General error
gpgv: Signature made Wed Dec 22 18:09:27 2021 UTC
gpgv: using RSA key 5C48FE6157F49179597087C64C5A6BAB12D2A7AE
gpgv: Can't check signature: No public key
dpkg-source: warning: failed to verify signature on ./pgloader_3.6.3-1.dsc
dpkg-source: info: extracting pgloader in /<<PKGBUILDDIR>>
dpkg-source: info: unpacking pgloader_3.6.3.orig.tar.gz
dpkg-source: info: unpacking pgloader_3.6.3-1.debian.tar.xz
Check disk 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=bookworm-staging-armhf-sbuild
SCHROOT_CHROOT_NAME=bookworm-staging-armhf-sbuild
SCHROOT_COMMAND=env
SCHROOT_GID=112
SCHROOT_GROUP=buildd
SCHROOT_SESSION_ID=bookworm-staging-armhf-sbuild-7b24ee16-e5fa-4eff-9458-9c400150db80
SCHROOT_UID=107
SCHROOT_USER=buildd
SHELL=/bin/sh
USER=buildd
dpkg-buildpackage
-----------------
dpkg-buildpackage: info: source package pgloader
dpkg-buildpackage: info: source version 3.6.3-1
dpkg-buildpackage: info: source distribution unstable
dpkg-source --before-build .
dpkg-buildpackage: info: host architecture armhf
dpkg-source: info: using options from pgloader-3.6.3/debian/source/options: --extend-diff-ignore=src/params.lisp
fakeroot debian/rules clean
dh clean
debian/rules override_dh_auto_clean
make[1]: Entering directory '/<<PKGBUILDDIR>>'
dh_auto_clean
make -j4 clean
make[2]: Entering directory '/<<PKGBUILDDIR>>'
rm -rf build/libs.stamp build/quicklisp build/manifest.ql build/bin/buildapp.sbcl build/bin/pgloader docs/_build
make[2]: Leaving directory '/<<PKGBUILDDIR>>'
rm -rf debian/home
make[1]: Leaving directory '/<<PKGBUILDDIR>>'
dh_clean
debian/rules build-arch
dh build-arch
dh_update_autotools_config -a
dh_autoreconf -a
dh_auto_configure -a
debian/rules override_dh_auto_build-arch
make[1]: Entering directory '/<<PKGBUILDDIR>>'
mkdir -p build/bin
mkdir -p /<<PKGBUILDDIR>>/debian/home
buildapp --require sb-posix \
--require sb-bsd-sockets \
--load /usr/share/common-lisp/source/cl-asdf/build/asdf.lisp \
--asdf-path . \
--asdf-tree /usr/share/common-lisp/systems \
--load-system asdf-finalizers \
--load-system asdf-system-connections \
--load-system cffi \
--load-system cl+ssl \
--load-system mssql \
--load src/hooks.lisp \
--load-system pgloader \
--entry pgloader:main \
--dynamic-space-size 1024 \
--compress-core \
--logfile buildapp.log \
--output build/bin/pgloader \
|| echo $? > buildapp.fail
; compiling file "/usr/share/common-lisp/source/cl-asdf/build/asdf.lisp" (written 12 OCT 2021 01:11:59 PM):
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-asdf/build/asdf-tmp7LQ0A0VI.fasl
; compilation finished in 0:00:28.632
;; loading file #P"/usr/share/common-lisp/source/cl-asdf/build/asdf.lisp"
;; loading system "asdf-finalizers"
;; loading system "asdf-system-connections"
;; loading system "cffi"
;; loading system "cl+ssl"
;; loading system "mssql"
;; loading file #P"/<<PKGBUILDDIR>>/src/hooks.lisp"
;; loading system "pgloader"
compressed 4096 bytes into 561 at level -1
compressed 4096 bytes into 842 at level -1
compressed 92598272 bytes into 24803992 at level -1
cat buildapp.log
;; loading file #P"/usr/share/common-lisp/source/cl-asdf/build/asdf.lisp"
;; loading #P"/usr/share/common-lisp/source/cl-asdf/build/asdf.lisp"
;; #<PACKAGE "UIOP/PACKAGE">
;; #<PACKAGE "UIOP/PACKAGE">
;; (:ASDF3.3 :ASDF3.2 :ASDF3.1 :ASDF3 :ASDF2 :ASDF :OS-UNIX
:NON-BASE-CHARS-EXIST-P :ASDF-UNICODE :ARM :GENCGC :ANSI-CL :COMMON-LISP
:ELF :IEEE-FLOATING-POINT :LINUX :LITTLE-ENDIAN :PACKAGE-LOCAL-NICKNAMES
:SB-CORE-COMPRESSION :SB-LDB :SB-PACKAGE-LOCKS :SB-UNICODE :SBCL :UNIX)
;; #<PACKAGE "UIOP/PACKAGE-LOCAL-NICKNAMES">
;; HOME-PACKAGE-P
;; UNREIFY-SYMBOL
;; NOTE-PACKAGE-FISHINESS
;; RENAME-PACKAGE-AWAY
;; PACKAGE-DEFINITION-FORM
;; ENSURE-PACKAGE
;; PARSE-DEFINE-PACKAGE-FORM
;; DEFINE-PACKAGE
;; #<PACKAGE "UIOP/PACKAGE*">
;; #<PACKAGE "UIOP/COMMON-LISP">
;; #<PACKAGE "UIOP/COMMON-LISP">
;; (:ASDF3.3 :ASDF3.2 :ASDF3.1 :ASDF3 :ASDF2 :ASDF :OS-UNIX
:NON-BASE-CHARS-EXIST-P :ASDF-UNICODE :ARM :GENCGC :ANSI-CL :COMMON-LISP
:ELF :IEEE-FLOATING-POINT :LINUX :LITTLE-ENDIAN :PACKAGE-LOCAL-NICKNAMES
:SB-CORE-COMPRESSION :SB-LDB :SB-PACKAGE-LOCKS :SB-UNICODE :SBCL :UNIX)
;; NIL
;; COMPATFMT
;; #<PACKAGE "UIOP/UTILITY">
;; #<PACKAGE "UIOP/UTILITY">
;; WITH-UPGRADABILITY
;; LOAD-UIOP-DEBUG-UTILITY
;; IF-LET
;; PARSE-BODY
;; ENSURE-LIST
;; REMOVE-PLIST-KEYS
;; EMPTYP
;; (:ASDF3.3 :ASDF3.2 :ASDF3.1 :ASDF3 :ASDF2 :ASDF :OS-UNIX
:NON-BASE-CHARS-EXIST-P :ASDF-UNICODE :ARM :GENCGC :ANSI-CL :COMMON-LISP
:ELF :IEEE-FLOATING-POINT :LINUX :LITTLE-ENDIAN :PACKAGE-LOCAL-NICKNAMES
:SB-CORE-COMPRESSION :SB-LDB :SB-PACKAGE-LOCKS :SB-UNICODE :SBCL :UNIX)
;; CHARACTER-TYPE-INDEX
;; FIND-STANDARD-CASE-SYMBOL
;; TIMESTAMP
;; LATEST-TIMESTAMP-F
;; REGISTER-HOOK-FUNCTION
;; COERCE-CLASS
;; LIST-TO-HASH-SET
;; LEXICOGRAPHIC<=
;; STYLE-WARN
;; WITH-MUFFLED-CONDITIONS
;; PARAMETER-ERROR
;; SYMBOL-TEST-TO-FEATURE-EXPRESSION
;; #<PACKAGE "UIOP/VERSION">
;; #<PACKAGE "UIOP/VERSION">
;; VERSION<=
;; WITH-DEPRECATION
;; #<PACKAGE "UIOP/OS">
;; #<PACKAGE "UIOP/OS">
;; :OS-UNIX
;; GETENVP
;; IMPLEMENTATION-IDENTIFIER
;; HOSTNAME
;; CHDIR
;; PARSE-WINDOWS-SHORTCUT
;; #<PACKAGE "UIOP/PATHNAME">
;; #<PACKAGE "UIOP/PATHNAME">
;; WITH-PATHNAME-DEFAULTS
;; FILE-PATHNAME-P
;; ENSURE-DIRECTORY-PATHNAME
;; UNIX-NAMESTRING
;; WITH-ENOUGH-PATHNAME
;; WILDEN
;; *OUTPUT-TRANSLATION-FUNCTION*
;; #<PACKAGE "UIOP/FILESYSTEM">
;; #<PACKAGE "UIOP/FILESYSTEM">
;; PARSE-NATIVE-NAMESTRING
;; COLLECT-SUB*DIRECTORIES
;; RESOLVE-SYMLINKS*
;; ENSURE-PATHNAME
;; WITH-CURRENT-DIRECTORY
;; LISP-IMPLEMENTATION-PATHNAME-P
;; DELETE-DIRECTORY-TREE
;; #<PACKAGE "UIOP/STREAM">
;; #<PACKAGE "UIOP/STREAM">
;; #<SB-SYS:FD-STREAM for "standard error" {518A0D81}>
;; ENCODING-EXTERNAL-FORMAT
;; SAFE-READ-FROM-STRING
;; CALL-WITH-OUTPUT
;; WITH-OUTPUT
;; OUTPUT-STRING
;; INPUT-STRING
;; WITH-NULL-OUTPUT
;; SAFE-FORMAT!
;; STANDARD-EVAL-THUNK
;; WRITELN
;; WITH-STAGING-PATHNAME
;; FILE-OR-SYNONYM-STREAM-P
;; #<PACKAGE "UIOP/IMAGE">
;; #<PACKAGE "UIOP/IMAGE">
;; *IMAGE-DUMP-HOOK*
;; FATAL-CONDITION
;; SHELL-BOOLEAN-EXIT
;; CALL-IMAGE-DUMP-HOOK
;; RESTORE-IMAGE
;; CREATE-IMAGE
;; NIL
;; #<PACKAGE "UIOP/LISP-BUILD">
;; #<PACKAGE "UIOP/LISP-BUILD">
;; *BASE-BUILD-DIRECTORY*
;; WITH-OPTIMIZATION-SETTINGS
;; *UNINTERESTING-LOADER-CONDITIONS*
;; WITH-MUFFLED-LOADER-CONDITIONS
;; CHECK-LISP-COMPILE-RESULTS
;; WITH-SAVED-DEFERRED-WARNINGS
;; LOAD-FROM-STRING
;; COMBINE-FASLS
;; #<PACKAGE "UIOP/LAUNCH-PROGRAM">
;; #<PACKAGE "UIOP/LAUNCH-PROGRAM">
;; ESCAPE-SHELL-COMMAND
;; LAUNCH-PROGRAM
;; #<PACKAGE "UIOP/RUN-PROGRAM">
;; #<PACKAGE "UIOP/RUN-PROGRAM">
;; #<STANDARD-METHOD UIOP/RUN-PROGRAM:SLURP-INPUT-STREAM (T T) {55E8BD39}>
;; #<STANDARD-METHOD UIOP/RUN-PROGRAM:VOMIT-OUTPUT-STREAM (T T) {561BAE69}>
;; RUN-PROGRAM
;; #<PACKAGE "UIOP/CONFIGURATION">
;; #<PACKAGE "UIOP/CONFIGURATION">
;; UIOP-DIRECTORY
;; #<PACKAGE "UIOP/BACKWARD-DRIVER">
;; #<PACKAGE "UIOP/BACKWARD-DRIVER">
;; VERSION-COMPATIBLE-P
;; #<PACKAGE "UIOP/DRIVER">
;; T
;; T
;; #<PACKAGE "ASDF/UPGRADE">
;; #<PACKAGE "ASDF/UPGRADE">
;; NIL
;; NIL
;; WITH-ASDF-DEPRECATION
;; #<PACKAGE "ASDF/SESSION">
;; #<PACKAGE "ASDF/SESSION">
;; SYSDEF-ERROR
;; #<PACKAGE "ASDF/COMPONENT">
;; #<PACKAGE "ASDF/COMPONENT">
;; DUPLICATE-NAMES
;; #<STANDARD-METHOD ASDF/COMPONENT:COMPONENT-SYSTEM (COMPONENT) {55AF4311}>
;; #<STANDARD-CLASS ASDF/COMPONENT:PARENT-COMPONENT>
;; COMPUTE-CHILDREN-BY-NAME
;; #<STANDARD-CLASS ASDF/COMPONENT:MODULE>
;; #<STANDARD-METHOD ASDF/COMPONENT:SOURCE-FILE-TYPE (FILE-COMPONENT
PARENT-COMPONENT) {55FCCB89}>
;; #<STANDARD-METHOD ASDF/COMPONENT:COMPONENT-EXTERNAL-FORMAT (COMPONENT) {5601EDE1}>
;; #<STANDARD-METHOD ASDF/COMPONENT:AROUND-COMPILE-HOOK (COMPONENT) {560889A1}>
;; #<STANDARD-METHOD ASDF/COMPONENT:VERSION-SATISFIES (STRING T) {5612AA09}>
;; SUB-COMPONENTS
;; #<PACKAGE "ASDF/OPERATION">
;; #<PACKAGE "ASDF/OPERATION">
;; NIL
;; #<STANDARD-METHOD COMMON-LISP:INITIALIZE-INSTANCE :AFTER (OPERATION) {562FB621}>
;; #<STANDARD-METHOD ASDF/OPERATION:FIND-OPERATION (T STRING) {56388289}>
;; #<PACKAGE "ASDF/SYSTEM">
;; #<PACKAGE "ASDF/SYSTEM">
;; #<STANDARD-METHOD ASDF/SYSTEM:COMPONENT-ENTRY-POINT (COMPONENT) {56413389}>
;; RESET-SYSTEM-CLASS
;; COERCE-FILENAME
;; SYSTEM-LICENSE
;; #<STANDARD-METHOD ASDF/SYSTEM:COMPONENT-BUILD-PATHNAME (COMPONENT) {56A6AA11}>
;; #<PACKAGE "ASDF/SYSTEM-REGISTRY">
;; #<PACKAGE "ASDF/SYSTEM-REGISTRY">
;; SYSDEF-CENTRAL-REGISTRY-SEARCH
;; #<PACKAGE "ASDF/ACTION">
;; #<PACKAGE "ASDF/ACTION">
;; OPERATION-DESIGNATOR
;; ACTION-COMPONENT
;; FIND-ACTION
;; DEFINE-CONVENIENCE-ACTION-METHODS
;; FORMAT-ACTION
;; WHILE-VISITING-ACTION
;; #<STANDARD-METHOD ASDF/ACTION:COMPONENT-DEPENDS-ON :AROUND (OPERATION
COMPONENT) {52020A19}>
;; #<STANDARD-CLASS ASDF/ACTION:NON-PROPAGATING-OPERATION>
;; #<STANDARD-METHOD ASDF/ACTION:SIDEWAY-OPERATION (OPERATION) {546AC801}>
;; #<STANDARD-METHOD ASDF/ACTION:INPUT-FILES (SELFWARD-OPERATION COMPONENT) {54C47761}>
;; #<STANDARD-METHOD ASDF/ACTION:MARK-OPERATION-DONE (OPERATION COMPONENT) {54E140A9}>
;; #<STANDARD-METHOD ASDF/ACTION:PERFORM-WITH-RESTARTS :AROUND (T T) {5521CF49}>
;; #<PACKAGE "ASDF/LISP-ACTION">
;; #<PACKAGE "ASDF/LISP-ACTION">
;; #<STANDARD-CLASS ASDF/LISP-ACTION:CL-SOURCE-FILE.LSP>
;; #<STANDARD-CLASS ASDF/LISP-ACTION:BASIC-COMPILE-OP>
;; #<STANDARD-CLASS ASDF/LISP-ACTION:TEST-OP>
;; #<STANDARD-METHOD ASDF/ACTION:INPUT-FILES (PREPARE-OP SYSTEM) {555F6AB1}>
;; #<STANDARD-METHOD ASDF/ACTION:OUTPUT-FILES (COMPILE-OP SYSTEM) {559456C9}>
;; #<STANDARD-METHOD ASDF/ACTION:PERFORM (LOAD-OP STATIC-FILE) {55C4DAC9}>
;; #<STANDARD-METHOD ASDF/ACTION:PERFORM (PREPARE-SOURCE-OP COMPONENT) {55D2EBD9}>
;; #<STANDARD-METHOD ASDF/ACTION:PERFORM (LOAD-SOURCE-OP STATIC-FILE) {55EAC181}>
;; #<STANDARD-METHOD ASDF/ACTION:OPERATION-DONE-P (TEST-OP SYSTEM) {55EE64F9}>
;; #<PACKAGE "ASDF/FIND-COMPONENT">
;; #<PACKAGE "ASDF/FIND-COMPONENT">
;; #<STANDARD-METHOD COMMON-LISP:PRINT-OBJECT (MISSING-COMPONENT-OF-VERSION T) {562A9039}>
;; #<STANDARD-METHOD ASDF/FIND-COMPONENT:RESOLVE-DEPENDENCY-COMBINATION (T
(EQL
:VERSION)
T) {5668FA29}>
;; #<PACKAGE "ASDF/FORCING">
;; #<PACKAGE "ASDF/FORCING">
;; #<STANDARD-METHOD ASDF/SESSION:FORCING (CONS) {56A6D0A9}>
;; #<PACKAGE "ASDF/PLAN">
;; #<PACKAGE "ASDF/PLAN">
;; #<STANDARD-METHOD ASDF/PLAN:RECORD-DEPENDENCY (SEQUENTIAL-PLAN OPERATION
COMPONENT) {56BAF209}>
;; NIL
;; +STATUS-VOID+
;; #<STANDARD-METHOD (COMMON-LISP:SETF ASDF/PLAN:ACTION-STATUS) :AFTER (T
SEQUENTIAL-PLAN
OPERATION
COMPONENT) {56FBAA61}>
;; #<STANDARD-METHOD ASDF/PLAN:NEEDED-IN-IMAGE-P (OPERATION COMPONENT) {56FE1B69}>
;; #<STANDARD-METHOD ASDF/ACTION:COMPUTE-ACTION-STAMP (T OPERATION COMPONENT) {51C926F9}>
;; ACTION-UP-TO-DATE-P
;; REQUIRED-COMPONENTS
;; #<STANDARD-METHOD ASDF/PLAN:MARK-AS-DONE (PLAN OPERATION COMPONENT) {5477D179}>
;; #<PACKAGE "ASDF/OPERATE">
;; #<PACKAGE "ASDF/OPERATE">
;; RECURSIVE-OPERATE
;; NIL
;; TEST-SYSTEM
;; ALREADY-LOADED-SYSTEMS
;; MODULE-PROVIDE-ASDF
;; NIL
;; #<PACKAGE "ASDF/FIND-SYSTEM">
;; #<PACKAGE "ASDF/FIND-SYSTEM">
;; MARK-COMPONENT-PRELOADED
;; #<PACKAGE "ASDF/PARSE-DEFSYSTEM">
;; #<PACKAGE "ASDF/PARSE-DEFSYSTEM">
;; DETERMINE-SYSTEM-DIRECTORY
;; NIL
;; #<STANDARD-METHOD ASDF/PARSE-DEFSYSTEM:CLASS-FOR-TYPE (PARENT-COMPONENT T) {55E55F19}>
;; NORMALIZE-VERSION
;; %REFRESH-COMPONENT-INLINE-METHODS
;; DEFSYSTEM
;; #<PACKAGE "ASDF/BUNDLE">
;; #<PACKAGE "ASDF/BUNDLE">
;; #<STANDARD-CLASS ASDF/BUNDLE:PREBUILT-SYSTEM>
;; NIL
;; USER-SYSTEM-P
;; USER-SYSTEM
;; SELECT-BUNDLE-OPERATION
;; #<STANDARD-METHOD ASDF/ACTION:MARK-OPERATION-DONE :AFTER (LOAD-BUNDLE-OP
SYSTEM) {51D560F9}>
;; #<STANDARD-METHOD ASDF/ACTION:PERFORM (OPERATION COMPILED-FILE) {51E17711}>
;; #<STANDARD-METHOD ASDF/ACTION:OUTPUT-FILES (LIB-OP PREBUILT-SYSTEM) {51EE55D9}>
;; #<STANDARD-METHOD ASDF/ACTION:COMPONENT-DEPENDS-ON (LOAD-BUNDLE-OP
PRECOMPILED-SYSTEM) {542CCF31}>
;; #<PACKAGE "ASDF/CONCATENATE-SOURCE">
;; #<PACKAGE "ASDF/CONCATENATE-SOURCE">
;; #<STANDARD-METHOD ASDF/ACTION:PERFORM (BASIC-LOAD-COMPILED-CONCATENATED-SOURCE-OP
SYSTEM) {546EA809}>
;; #<PACKAGE "ASDF/PACKAGE-INFERRED-SYSTEM">
;; #<PACKAGE "ASDF/PACKAGE-INFERRED-SYSTEM">
;; SYSDEF-PACKAGE-INFERRED-SYSTEM-SEARCH
;; (DUMPER518::SYSTEM-SEARCH-FUNCTION SYSDEF-PACKAGE-INFERRED-SYSTEM-SEARCH
SYSDEF-CENTRAL-REGISTRY-SEARCH
SYSDEF-SOURCE-REGISTRY-SEARCH)
;; #<PACKAGE "ASDF/OUTPUT-TRANSLATIONS">
;; #<PACKAGE "ASDF/OUTPUT-TRANSLATIONS">
;; NIL
;; APPLY-OUTPUT-TRANSLATIONS
;; #<PACKAGE "ASDF/SOURCE-REGISTRY">
;; #<PACKAGE "ASDF/SOURCE-REGISTRY">
;; SYSDEF-SOURCE-REGISTRY-SEARCH
;; #<PACKAGE "ASDF/BACKWARD-INTERNALS">
;; #<PACKAGE "ASDF/BACKWARD-INTERNALS">
;; LOAD-SYSDEF
;; #<PACKAGE "ASDF/BACKWARD-INTERFACE">
;; #<PACKAGE "ASDF/BACKWARD-INTERFACE">
;; #<STANDARD-METHOD ASDF/PARSE-DEFSYSTEM:EXPLAIN (OPERATION COMPONENT) {566230A9}>
;; REQUIRE-SYSTEM
;; #<PACKAGE "ASDF/INTERFACE">
;; #<PACKAGE "ASDF/USER">
;; #<PACKAGE "ASDF/FOOTER">
;; #<PACKAGE "ASDF/FOOTER">
;; NIL
;; (MODULE-PROVIDE-ASDF SB-IMPL::MODULE-PROVIDE-CONTRIB)
;; NIL
;; NIL
;; loading system "asdf-finalizers"
; compiling file "/usr/share/common-lisp/source/asdf-finalizers/pkgdcl.lisp" (written 27 MAR 2017 05:20:19 AM):
; processing (UIOP/PACKAGE:DEFINE-PACKAGE :ASDF-FINALIZERS ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/asdf-finalizers/pkgdcl-tmp74KGUNRZ.fasl
; compilation finished in 0:00:00.024
; compiling file "/usr/share/common-lisp/source/asdf-finalizers/finalizers.lisp" (written 27 MAR 2017 05:20:19 AM):
; processing (IN-PACKAGE :ASDF-FINALIZERS)
; processing (DEFVAR *WARN-WHEN-FINALIZERS-OFF* ...)
; processing (DEFVAR *DEBUG-FINALIZERS* ...)
; processing (DEFINE-CONDITION FINALIZERS-OFF ...)
; processing (DEFINE-CONDITION FINALIZERS-OFF-ERROR ...)
; processing (DEFINE-CONDITION FINALIZERS-OFF-SIMPLE-ERROR ...)
; processing (DEFINE-CONDITION FINALIZERS-OFF-WARNING ...)
; processing (DEFINE-CONDITION FINALIZERS-OFF-SIMPLE-WARNING ...)
; processing (DEFINE-CONDITION MISSING-FINAL-FORMS ...)
; processing (DEFVAR *FINALIZERS*)
; processing (DEFVAR *FINALIZERS-DATA* ...)
; processing (DEFUN USING-FINALIZERS-P ...)
; processing (DEFUN RESET-FINALIZERS ...)
; processing (DEFUN DISABLE-FINALIZERS ...)
; processing (DEFMACRO FINAL-FORMS ...)
; processing (DEFMACRO FINAL-FORMS-INTERNAL ...)
; processing (DEFUN EXPAND-FINAL-FORMS ...)
; processing (DEFUN REGISTER-FINALIZER ...)
; processing (DEFUN REGISTER-FINAL-FORM ...)
; processing (DEFUN NO-FINALIZER-LEFT-BEHIND-P ...)
; processing (DEFUN ASSERT-NO-FINALIZER-LEFT-BEHIND ...)
; processing (DEFMACRO WITH-FINALIZERS ...)
; processing (DEFUN CALL-WITH-FINALIZERS ...)
; processing (DEFUN EVAL-AT-TOPLEVEL ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/asdf-finalizers/finalizers-tmpCEL1YIM2.fasl
; compilation finished in 0:00:00.180
; compiling file "/usr/share/common-lisp/source/asdf-finalizers/asdf-support.lisp" (written 27 MAR 2017 05:20:19 AM):
; processing (IN-PACKAGE :ASDF-FINALIZERS)
; processing (DEFUN COMPILE-CHECK-FINALIZERS ...)
; processing (DEFUN CHECK-FINALIZERS-AROUND-COMPILE ...)
; processing (DEFCLASS ASDF/INTERFACE::FINALIZED-CL-SOURCE-FILE ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/asdf-finalizers/asdf-support-tmpHAMQABTV.fasl
; compilation finished in 0:00:00.024
; compiling file "/usr/share/common-lisp/source/asdf-finalizers/initialization.lisp" (written 27 MAR 2017 05:20:19 AM):
; processing (IN-PACKAGE :ASDF-FINALIZERS)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/asdf-finalizers/initialization-tmpUPMG0IBO.fasl
; compilation finished in 0:00:00.004
;; loading system "asdf-system-connections"
; compiling file "/usr/share/common-lisp/source/asdf-system-connections/dev/asdf-system-connections.lisp" (written 23 DEC 2016 07:00:46 PM):
; processing (IN-PACKAGE :ASDF)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...)
; processing (DEFCLASS SYSTEM-CONNECTION ...)
; processing (DEFUN MAP-SYSTEM-CONNECTIONS ...)
; processing (DEFMACRO DEFSYSTEM-CONNECTION ...)
; processing (DEFUN LOAD-CONNECTED-SYSTEMS ...)
; processing (DEFUN REQUIRED-SYSTEMS-LOADED-P ...)
; processing (UNLESS (FBOUNDP #) ...)
; file: /usr/share/common-lisp/source/asdf-system-connections/dev/asdf-system-connections.lisp
; in: DEFUN REGISTERED-SYSTEM
; (ASDF/BACKWARD-INTERFACE:SYSTEM-REGISTERED-P ASDF/INTERFACE::SYSTEM-NAME)
;
; caught STYLE-WARNING:
; DEPRECATED-FUNCTION-STYLE-WARNING: Using deprecated function ASDF/BACKWARD-INTERFACE:SYSTEM-REGISTERED-P -- please update your code to use a newer API.
; The docstring for this function says:
; DEPRECATED. Return a generalized boolean that is true if a system of given NAME was registered already.
; NAME is a system designator, to be normalized by COERCE-NAME.
; The value returned if true is a pair of a timestamp and a system object.
;
; processing (DEFUN SYSTEM-LOADED-P ...)
; processing (DEFMETHOD OPERATE ...)
; processing (PUSHNEW :ASDF-SYSTEM-CONNECTIONS ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/asdf-system-connections/dev/asdf-system-connections-tmpAKM32D0F.fasl
; compilation finished in 0:00:00.072
WARNING:
Lisp compilation had style-warnings while compiling
#<CL-SOURCE-FILE "asdf-system-connections" "dev" "asdf-system-connections">
;
; compilation unit finished
; caught 1 STYLE-WARNING condition
;; loading system "cffi"
; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/package.lisp" (written 25 OCT 2021 08:11:41 AM):
; processing (DEFPACKAGE :ALEXANDRIA ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/package-tmp8UG37QJ5.fasl
; compilation finished in 0:00:00.008
; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/definitions.lisp" (written 25 OCT 2021 08:11:41 AM):
; processing (IN-PACKAGE :ALEXANDRIA)
; processing (DEFUN %REEVALUATE-CONSTANT ...)
; processing (DEFMACRO DEFINE-CONSTANT ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/definitions-tmp65YV5VYW.fasl
; compilation finished in 0:00:00.052
; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/binding.lisp" (written 25 OCT 2021 08:11:41 AM):
; processing (IN-PACKAGE :ALEXANDRIA)
; processing (DEFMACRO IF-LET ...)
; processing (DEFMACRO WHEN-LET ...)
; processing (DEFMACRO WHEN-LET* ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/binding-tmpGO4MNX7G.fasl
; compilation finished in 0:00:00.076
; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/strings.lisp" (written 25 OCT 2021 08:11:41 AM):
; processing (IN-PACKAGE :ALEXANDRIA)
; processing (DEFTYPE STRING-DESIGNATOR ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/strings-tmp9NXH2K1.fasl
; compilation finished in 0:00:00.004
; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/conditions.lisp" (written 25 OCT 2021 08:11:41 AM):
; processing (IN-PACKAGE :ALEXANDRIA)
; processing (DEFUN REQUIRED-ARGUMENT ...)
; processing (DEFINE-CONDITION SIMPLE-STYLE-WARNING ...)
; processing (DEFUN SIMPLE-STYLE-WARNING ...)
; processing (DEFINE-CONDITION SIMPLE-READER-ERROR ...)
; processing (DEFUN SIMPLE-READER-ERROR ...)
; processing (DEFINE-CONDITION SIMPLE-PARSE-ERROR ...)
; processing (DEFUN SIMPLE-PARSE-ERROR ...)
; processing (DEFINE-CONDITION SIMPLE-PROGRAM-ERROR ...)
; processing (DEFUN SIMPLE-PROGRAM-ERROR ...)
; processing (DEFMACRO IGNORE-SOME-CONDITIONS ...)
; processing (DEFMACRO UNWIND-PROTECT-CASE ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/conditions-tmp6B86GLV2.fasl
; compilation finished in 0:00:00.092
; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/symbols.lisp" (written 25 OCT 2021 08:11:41 AM):
; processing (IN-PACKAGE :ALEXANDRIA)
; processing (DECLAIM (INLINE ENSURE-SYMBOL))
; processing (DEFUN ENSURE-SYMBOL ...)
; processing (DEFUN MAYBE-INTERN ...)
; processing (DECLAIM (INLINE FORMAT-SYMBOL))
; processing (DEFUN FORMAT-SYMBOL ...)
; processing (DEFUN MAKE-KEYWORD ...)
; processing (DEFUN MAKE-GENSYM ...)
; processing (DEFUN MAKE-GENSYM-LIST ...)
; processing (DEFUN SYMBOLICATE ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/symbols-tmpZWLLOVAH.fasl
; compilation finished in 0:00:00.064
; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/macros.lisp" (written 25 OCT 2021 08:11:41 AM):
; processing (IN-PACKAGE :ALEXANDRIA)
; processing (DEFMACRO WITH-GENSYMS ...)
; processing (DEFMACRO WITH-UNIQUE-NAMES ...)
; processing (DEFMACRO ONCE-ONLY ...)
; processing (DEFUN PARSE-BODY ...)
; processing (DEFUN PARSE-ORDINARY-LAMBDA-LIST ...)
; processing (DEFUN EXPAND-DESTRUCTURING-CASE ...)
; processing (DEFMACRO DESTRUCTURING-CASE ...)
; processing (DEFMACRO DESTRUCTURING-CCASE ...)
; processing (DEFMACRO DESTRUCTURING-ECASE ...)
; processing (DOLIST (NAME #) ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/macros-tmpS9M8BVBG.fasl
; compilation finished in 0:00:00.312
; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/functions.lisp" (written 25 OCT 2021 08:11:41 AM):
; processing (IN-PACKAGE :ALEXANDRIA)
; processing (DECLAIM (INLINE ENSURE-FUNCTION))
; processing (DECLAIM (FTYPE # ...))
; processing (DEFUN ENSURE-FUNCTION ...)
; processing (DEFINE-MODIFY-MACRO ENSURE-FUNCTIONF/1 ...)
; processing (DEFMACRO ENSURE-FUNCTIONF ...)
; processing (DEFUN DISJOIN ...)
; processing (DEFUN CONJOIN ...)
; processing (DEFUN COMPOSE ...)
; processing (DEFINE-COMPILER-MACRO COMPOSE ...)
; processing (DEFUN MULTIPLE-VALUE-COMPOSE ...)
; processing (DEFINE-COMPILER-MACRO MULTIPLE-VALUE-COMPOSE ...)
; processing (DECLAIM (INLINE CURRY ...))
; processing (DEFUN CURRY ...)
; processing (DEFINE-COMPILER-MACRO CURRY ...)
; processing (DEFUN RCURRY ...)
; processing (DEFINE-COMPILER-MACRO RCURRY ...)
; processing (DECLAIM (NOTINLINE CURRY ...))
; processing (DEFMACRO NAMED-LAMBDA ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/functions-tmp205IFRLS.fasl
; compilation finished in 0:00:00.232
; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/lists.lisp" (written 25 OCT 2021 08:11:41 AM):
; processing (IN-PACKAGE :ALEXANDRIA)
; processing (DECLAIM (INLINE SAFE-ENDP))
; processing (DEFUN SAFE-ENDP ...)
; processing (DEFUN ALIST-PLIST ...)
; processing (DEFUN PLIST-ALIST ...)
; processing (DECLAIM (INLINE RACONS))
; processing (DEFUN RACONS ...)
; processing (MACROLET (#) ...)
; processing (DEFUN MALFORMED-PLIST ...)
; processing (DEFMACRO DOPLIST ...)
; processing (DEFINE-MODIFY-MACRO APPENDF ...)
; processing (DEFINE-MODIFY-MACRO NCONCF ...)
; processing (DEFINE-MODIFY-MACRO UNIONF ...)
; processing (DEFINE-MODIFY-MACRO NUNIONF ...)
; processing (DEFINE-MODIFY-MACRO REVERSEF ...)
; processing (DEFINE-MODIFY-MACRO NREVERSEF ...)
; processing (DEFUN CIRCULAR-LIST ...)
; processing (DEFUN CIRCULAR-LIST-P ...)
; processing (DEFUN CIRCULAR-TREE-P ...)
; processing (DEFUN PROPER-LIST-P ...)
; processing (DEFTYPE PROPER-LIST ...)
; processing (DEFUN CIRCULAR-LIST-ERROR ...)
; processing (MACROLET (#) ...)
; processing (DEFUN MAKE-CIRCULAR-LIST ...)
; processing (DEFTYPE CIRCULAR-LIST ...)
; processing (DEFUN ENSURE-CAR ...)
; processing (DEFUN ENSURE-CONS ...)
; processing (DEFUN ENSURE-LIST ...)
; processing (DEFUN REMOVE-FROM-PLIST ...)
; processing (DEFUN DELETE-FROM-PLIST ...)
; processing (DEFINE-MODIFY-MACRO REMOVE-FROM-PLISTF ...)
; processing (DEFINE-MODIFY-MACRO DELETE-FROM-PLISTF ...)
; processing (DECLAIM (INLINE SANS))
; processing (DEFUN SANS ...)
; processing (DEFUN MAPPEND ...)
; processing (DEFUN SETP ...)
; processing (DEFUN SET-EQUAL ...)
; processing (DEFUN MAP-PRODUCT ...)
; processing (DEFUN FLATTEN ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/lists-tmpBW6GBZVX.fasl
; compilation finished in 0:00:00.560
; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/types.lisp" (written 25 OCT 2021 08:11:41 AM):
; processing (IN-PACKAGE :ALEXANDRIA)
; processing (DEFTYPE ARRAY-INDEX ...)
; processing (DEFTYPE ARRAY-LENGTH ...)
; processing (MACROLET (#) ...)
; processing (DEFUN OF-TYPE ...)
; processing (DEFINE-COMPILER-MACRO OF-TYPE ...)
; processing (DECLAIM (INLINE TYPE=))
; processing (DEFUN TYPE= ...)
; processing (DEFINE-MODIFY-MACRO COERCEF ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/types-tmpMDMI656Q.fasl
; compilation finished in 0:00:00.372
; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/io.lisp" (written 25 OCT 2021 08:11:41 AM):
; processing (IN-PACKAGE :ALEXANDRIA)
; processing (DEFMACRO WITH-OPEN-FILE* ...)
; processing (DEFMACRO WITH-INPUT-FROM-FILE ...)
; processing (DEFMACRO WITH-OUTPUT-TO-FILE ...)
; processing (DEFUN READ-STREAM-CONTENT-INTO-STRING ...)
; processing (DEFUN READ-FILE-INTO-STRING ...)
; processing (DEFUN WRITE-STRING-INTO-FILE ...)
; processing (DEFUN READ-STREAM-CONTENT-INTO-BYTE-VECTOR ...)
; processing (DEFUN READ-FILE-INTO-BYTE-VECTOR ...)
; processing (DEFUN WRITE-BYTE-VECTOR-INTO-FILE ...)
; processing (DEFUN COPY-FILE ...)
; processing (DEFUN COPY-STREAM ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/io-tmpQN7VP0FI.fasl
; compilation finished in 0:00:00.368
; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/hash-tables.lisp" (written 25 OCT 2021 08:11:41 AM):
; processing (IN-PACKAGE :ALEXANDRIA)
; processing (DEFMACRO ENSURE-GETHASH ...)
; processing (DEFUN COPY-HASH-TABLE ...)
; processing (DECLAIM (INLINE MAPHASH-KEYS))
; processing (DEFUN MAPHASH-KEYS ...)
; processing (DECLAIM (INLINE MAPHASH-VALUES))
; processing (DEFUN MAPHASH-VALUES ...)
; processing (DEFUN HASH-TABLE-KEYS ...)
; processing (DEFUN HASH-TABLE-VALUES ...)
; processing (DEFUN HASH-TABLE-ALIST ...)
; processing (DEFUN HASH-TABLE-PLIST ...)
; processing (DEFUN ALIST-HASH-TABLE ...)
; processing (DEFUN PLIST-HASH-TABLE ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/hash-tables-tmpNOSTK6D0.fasl
; compilation finished in 0:00:00.168
; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/control-flow.lisp" (written 25 OCT 2021 08:11:41 AM):
; processing (IN-PACKAGE :ALEXANDRIA)
; processing (DEFUN EXTRACT-FUNCTION-NAME ...)
; processing (DEFUN GENERATE-SWITCH-BODY ...)
; processing (DEFMACRO SWITCH ...)
; processing (DEFMACRO ESWITCH ...)
; processing (DEFMACRO CSWITCH ...)
; processing (DEFMACRO WHICHEVER ...)
; processing (DEFMACRO XOR ...)
; processing (DEFMACRO NTH-VALUE-OR ...)
; processing (DEFMACRO MULTIPLE-VALUE-PROG2 ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/control-flow-tmp9RA72042.fasl
; compilation finished in 0:00:00.228
; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/arrays.lisp" (written 25 OCT 2021 08:11:41 AM):
; processing (IN-PACKAGE :ALEXANDRIA)
; processing (DEFUN COPY-ARRAY ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/arrays-tmpGXZUHQQV.fasl
; compilation finished in 0:00:00.040
; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/sequences.lisp" (written 25 OCT 2021 08:11:41 AM):
; processing (IN-PACKAGE :ALEXANDRIA)
; processing (DECLAIM (INLINE COPY-SEQUENCE ...))
; processing (DEFUN SEQUENCE-OF-LENGTH-P ...)
; processing (DEFUN ROTATE-TAIL-TO-HEAD ...)
; processing (DEFUN ROTATE-HEAD-TO-TAIL ...)
; processing (DEFUN ROTATE ...)
; processing (DEFUN SHUFFLE ...)
; processing (DEFUN RANDOM-ELT ...)
; processing (DECLAIM (INLINE REMOVE/SWAPPED-ARGUMENTS))
; processing (DEFUN REMOVE/SWAPPED-ARGUMENTS ...)
; processing (DEFINE-MODIFY-MACRO REMOVEF ...)
; processing (DECLAIM (INLINE DELETE/SWAPPED-ARGUMENTS))
; processing (DEFUN DELETE/SWAPPED-ARGUMENTS ...)
; processing (DEFINE-MODIFY-MACRO DELETEF ...)
; processing (DEFTYPE PROPER-SEQUENCE ...)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...)
; processing (DECLAIM (FTYPE # ...))
; processing (SETF (SYMBOL-FUNCTION #) ...)
; processing (DEFINE-COMPILER-MACRO EMPTYP ...)
; processing (DEFUN LENGTH= ...)
; file: /usr/share/common-lisp/source/alexandria/alexandria-1/sequences.lisp
; in: DEFUN LENGTH=
; (LENGTH FIRST)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; processing (DEFINE-COMPILER-MACRO LENGTH= ...)
; processing (DEFUN COPY-SEQUENCE ...)
; processing (DEFUN FIRST-ELT ...)
; processing (DEFUN (SETF FIRST-ELT) ...)
; processing (DEFUN LAST-ELT ...)
; processing (DEFUN (SETF LAST-ELT) ...)
; processing (DEFUN STARTS-WITH-SUBSEQ ...)
; processing (DEFUN ENDS-WITH-SUBSEQ ...)
; processing (DEFUN STARTS-WITH ...)
; processing (DEFUN ENDS-WITH ...)
; processing (DEFUN MAP-COMBINATIONS ...)
; processing (DEFUN MAP-PERMUTATIONS ...)
; processing (DEFUN MAP-DERANGEMENTS ...)
; file: /usr/share/common-lisp/source/alexandria/alexandria-1/sequences.lisp
; in: DEFUN MAP-DERANGEMENTS
; (MAKE-ARRAY ALEXANDRIA::SIZE :ELEMENT-TYPE 'BIT :INITIAL-ELEMENT 0)
;
; note: could not stack allocate:
; (MAKE-ARRAY SIZE :ELEMENT-TYPE 'BIT :INITIAL-ELEMENT 0)
; processing (DECLAIM (NOTINLINE SEQUENCE-OF-LENGTH-P))
; processing (DEFUN EXTREMUM ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/sequences-tmp1SBDRUB4.fasl
; compilation finished in 0:00:00.636
; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/numbers.lisp" (written 25 OCT 2021 08:11:41 AM):
; processing (IN-PACKAGE :ALEXANDRIA)
; processing (DECLAIM (INLINE CLAMP))
; processing (DEFUN CLAMP ...)
; processing (DEFUN GAUSSIAN-RANDOM ...)
; processing (DECLAIM (INLINE IOTA))
; processing (DEFUN IOTA ...)
; processing (DECLAIM (INLINE MAP-IOTA))
; processing (DEFUN MAP-IOTA ...)
; processing (DECLAIM (INLINE LERP))
; processing (DEFUN LERP ...)
; processing (DECLAIM (INLINE MEAN))
; processing (DEFUN MEAN ...)
; processing (DEFUN MEDIAN ...)
; processing (DECLAIM (INLINE VARIANCE))
; processing (DEFUN VARIANCE ...)
; processing (DECLAIM (INLINE STANDARD-DEVIATION))
; processing (DEFUN STANDARD-DEVIATION ...)
; processing (DEFINE-MODIFY-MACRO MAXF ...)
; processing (DEFINE-MODIFY-MACRO MINF ...)
; processing (DEFCONSTANT +FACTORIAL-BISECTION-RANGE-LIMIT+ ...)
; processing (DEFCONSTANT +FACTORIAL-DIRECT-MULTIPLICATION-LIMIT+ ...)
; processing (DEFUN %MULTIPLY-RANGE ...)
; processing (DECLAIM (INLINE FACTORIAL))
; processing (DEFUN %FACTORIAL ...)
; processing (DEFUN FACTORIAL ...)
; processing (DEFUN BINOMIAL-COEFFICIENT ...)
; processing (DEFUN SUBFACTORIAL ...)
; processing (DEFUN COUNT-PERMUTATIONS ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/numbers-tmpFJI67R2A.fasl
; compilation finished in 0:00:00.460
; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/features.lisp" (written 25 OCT 2021 08:11:41 AM):
; processing (IN-PACKAGE :ALEXANDRIA)
; processing (DEFUN FEATUREP ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/features-tmp2LAB0LT0.fasl
; compilation finished in 0:00:00.040
; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-2/package.lisp" (written 25 OCT 2021 08:11:41 AM):
; processing (IN-PACKAGE :CL-USER)
; processing (DEFPACKAGE :ALEXANDRIA-2 ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-2/package-tmp5G8XXQL5.fasl
; compilation finished in 0:00:00.024
; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-2/arrays.lisp" (written 25 OCT 2021 08:11:41 AM):
; processing (IN-PACKAGE :ALEXANDRIA-2)
; processing (DEFUN DIM-IN-BOUNDS-P ...)
; processing (DEFUN ROW-MAJOR-INDEX ...)
; processing (DEFUN RMAJOR-TO-INDICES ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-2/arrays-tmp70X8ZE5V.fasl
; compilation finished in 0:00:00.068
; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-2/control-flow.lisp" (written 25 OCT 2021 08:11:41 AM):
; processing (IN-PACKAGE :ALEXANDRIA-2)
; processing (DEFUN LINE-UP-ITER ...)
; processing (DEFMACRO LINE-UP-FIRST ...)
; processing (DEFMACRO LINE-UP-LAST ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-2/control-flow-tmpRJ7B84T0.fasl
; compilation finished in 0:00:00.032
; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-2/sequences.lisp" (written 25 OCT 2021 08:11:41 AM):
; processing (IN-PACKAGE :ALEXANDRIA-2)
; processing (DEFUN SUBSEQ* ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-2/sequences-tmpOMGCSPAB.fasl
; compilation finished in 0:00:00.016
; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-2/lists.lisp" (written 25 OCT 2021 08:11:41 AM):
; processing (IN-PACKAGE :ALEXANDRIA-2)
; processing (DEFUN DELETE-FROM-PLIST* ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-2/lists-tmpLEWWGRGS.fasl
; compilation finished in 0:00:00.020
; compiling file "/usr/share/common-lisp/source/trivial-features/src/tf-sbcl.lisp" (written 28 FEB 2021 08:31:40 PM):
; processing (IN-PACKAGE :CL-USER)
; processing (PUSHNEW (WITH-ALIEN # ...) ...)
; processing (PUSHNEW :32-BIT ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/trivial-features/src/tf-sbcl-tmp2VH9CUXA.fasl
; compilation finished in 0:00:00.024
; compiling file "/usr/share/common-lisp/source/babel/src/packages.lisp" (written 19 JUL 2020 06:57:54 AM):
; processing (IN-PACKAGE #:CL-USER)
; processing (DEFPACKAGE #:BABEL-ENCODINGS ...)
; processing (DEFPACKAGE #:BABEL ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/babel/src/packages-tmp21MKT5OO.fasl
; compilation finished in 0:00:00.008
; compiling file "/usr/share/common-lisp/source/babel/src/encodings.lisp" (written 19 JUL 2020 06:57:54 AM):
; processing (IN-PACKAGE #:BABEL-ENCODINGS)
; processing (DEFCLASS CHARACTER-ENCODING ...)
; processing (DEFMETHOD INITIALIZE-INSTANCE ...)
; processing (DEFVAR *SUPPORTED-CHARACTER-ENCODINGS* ...)
; processing (DEFUN LIST-CHARACTER-ENCODINGS ...)
; processing (DEFVAR *CHARACTER-ENCODINGS* ...)
; processing (DEFVAR *DEFAULT-CHARACTER-ENCODING* ...)
; processing (DEFUN GET-CHARACTER-ENCODING ...)
; processing (DEFMETHOD AMBIGUOUS-ENCODING-P ...)
; processing (DEFUN NOTICE-CHARACTER-ENCODING ...)
; processing (DEFMACRO DEFINE-CHARACTER-ENCODING ...)
; processing (DEFUN MAKE-FIXED-WIDTH-COUNTER ...)
; processing (DEFUN MAKE-DUMMY-CODER ...)
; processing (DEFCLASS ABSTRACT-MAPPING ...)
; processing (DEFCLASS CONCRETE-MAPPING ...)
; processing (DEFPARAMETER *ABSTRACT-MAPPINGS* ...)
; processing (DEFUN GET-ABSTRACT-MAPPING ...)
; processing (DEFUN (SETF GET-ABSTRACT-MAPPING) ...)
; processing (DEFUN %REGISTER-MAPPING-PART ...)
; processing (DEFMACRO DEFINE-ENCODER ...)
; processing (DEFMACRO DEFINE-DECODER ...)
; processing (DEFMACRO DEFINE-OCTET-COUNTER ...)
; processing (DEFMACRO DEFINE-CODE-POINT-COUNTER ...)
; processing (DEFUN INSTANTIATE-ENCODER ...)
; processing (DEFUN INSTANTIATE-DECODER ...)
; processing (DEFUN INSTANTIATE-CODE-POINT-COUNTER ...)
; processing (DEFUN INSTANTIATE-OCTET-COUNTER ...)
; processing (DEFMACRO INSTANTIATE-CONCRETE-MAPPINGS ...)
; processing (DEFCONSTANT +DEFAULT-SUBSTITUTION-CODE-POINT+ ...)
; processing (DEFTYPE UB8 ...)
; processing (DEFTYPE CODE-POINT ...)
; processing (DEFMACRO DEFINE-UNIBYTE-ENCODER ...)
; processing (DEFMACRO DEFINE-UNIBYTE-DECODER ...)
; processing (DEFVAR *SUPPRESS-CHARACTER-CODING-ERRORS* ...)
; processing (DEFINE-CONDITION CHARACTER-CODING-ERROR ...)
; processing (DEFINE-CONDITION CHARACTER-ENCODING-ERROR ...)
; processing (DECLAIM (INLINE ENCODING-ERROR))
; processing (DEFUN ENCODING-ERROR ...)
; processing (DEFINE-CONDITION CHARACTER-DECODING-ERROR ...)
; processing (DEFINE-CONDITION END-OF-INPUT-IN-CHARACTER ...)
; processing (DEFINE-CONDITION CHARACTER-OUT-OF-RANGE ...)
; processing (DECLAIM (INLINE DECODING-ERROR))
; processing (DEFUN DECODING-ERROR ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/babel/src/encodings-tmpMXTBQGWB.fasl
; compilation finished in 0:00:00.584
; compiling file "/usr/share/common-lisp/source/babel/src/enc-ascii.lisp" (written 19 JUL 2020 06:57:54 AM):
; processing (IN-PACKAGE #:BABEL-ENCODINGS)
; processing (DEFINE-CHARACTER-ENCODING :ASCII ...)
; processing (DEFINE-UNIBYTE-ENCODER :ASCII ...)
; processing (DEFINE-UNIBYTE-DECODER :ASCII ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/babel/src/enc-ascii-tmpPPC4Z10Q.fasl
; compilation finished in 0:00:00.032
; compiling file "/usr/share/common-lisp/source/babel/src/enc-ebcdic.lisp" (written 19 JUL 2020 06:57:54 AM):
; processing (IN-PACKAGE #:BABEL-ENCODINGS)
; processing (DEFINE-CHARACTER-ENCODING :EBCDIC-US ...)
; processing (DEFINE-CONSTANT +EBCDIC-DECODE-TABLE+ ...)
; processing (DEFINE-CONSTANT +EBCDIC-ENCODE-TABLE+ ...)
; processing (DEFINE-UNIBYTE-ENCODER :EBCDIC-US ...)
; processing (DEFINE-UNIBYTE-DECODER :EBCDIC-US ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/babel/src/enc-ebcdic-tmpRD3N4073.fasl
; compilation finished in 0:00:00.076
; compiling file "/usr/share/common-lisp/source/babel/src/enc-ebcdic-int.lisp" (written 19 JUL 2020 06:57:54 AM):
; processing (IN-PACKAGE #:BABEL-ENCODINGS)
; processing (DEFINE-CHARACTER-ENCODING :EBCDIC-INTERNATIONAL ...)
; processing (DEFPARAMETER +EBCDIC-INT-TO-UNICODE+ ...)
; processing (DEFPARAMETER +UNICODE-UPTO-AC-EBCDIC-INT+ ...)
; processing (DEFPARAMETER +UNICODE-0410-0450-EBCDIC-INT+ ...)
; processing (DEFINE-UNIBYTE-DECODER :EBCDIC-INTERNATIONAL ...)
; processing (DEFINE-UNIBYTE-ENCODER :EBCDIC-INTERNATIONAL ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/babel/src/enc-ebcdic-int-tmpFHOV2EXD.fasl
; compilation finished in 0:00:00.036
; compiling file "/usr/share/common-lisp/source/babel/src/enc-iso-8859.lisp" (written 19 JUL 2020 06:57:54 AM):
; processing (IN-PACKAGE #:BABEL-ENCODINGS)
; processing (DEFINE-CHARACTER-ENCODING :ISO-8859-1 ...)
; processing (DEFINE-UNIBYTE-ENCODER :ISO-8859-1 ...)
; processing (DEFINE-UNIBYTE-DECODER :ISO-8859-1 ...)
; processing (DEFINE-CHARACTER-ENCODING :ISO-8859-2 ...)
; processing (DEFINE-CONSTANT +UNICODE-00A0-0180-TO-ISO-8859-2+ ...)
; processing (DEFINE-CONSTANT +UNICODE-02C0-02E0-TO-ISO-8859-2+ ...)
; processing (DEFINE-UNIBYTE-ENCODER :ISO-8859-2 ...)
; processing (DEFINE-CONSTANT +ISO-8859-2-TO-UNICODE+ ...)
; processing (DEFINE-UNIBYTE-DECODER :ISO-8859-2 ...)
; processing (DEFINE-CHARACTER-ENCODING :ISO-8859-3 ...)
; processing (DEFINE-CONSTANT +UNICODE-A0-100-TO-ISO-8859-3+ ...)
; processing (DEFINE-CONSTANT +UNICODE-108-180-TO-ISO-8859-3+ ...)
; processing (DEFINE-CONSTANT +UNICODE-2D8-2E0-TO-ISO-8859-3+ ...)
; processing (DEFINE-UNIBYTE-ENCODER :ISO-8859-3 ...)
; processing (DEFINE-CONSTANT +ISO-8859-3-TO-UNICODE+ ...)
; processing (DEFINE-UNIBYTE-DECODER :ISO-8859-3 ...)
; processing (DEFINE-CHARACTER-ENCODING :ISO-8859-4 ...)
; processing (DEFINE-CONSTANT +UNICODE-A0-180-TO-ISO-8859-4+ ...)
; processing (DEFINE-CONSTANT +UNICODE-2C0-2E0-TO-ISO-8859-4+ ...)
; processing (DEFINE-UNIBYTE-ENCODER :ISO-8859-4 ...)
; processing (DEFINE-CONSTANT +ISO-8859-4-TO-UNICODE+ ...)
; processing (DEFINE-UNIBYTE-DECODER :ISO-8859-4 ...)
; processing (DEFINE-CHARACTER-ENCODING :ISO-8859-5 ...)
; processing (DEFINE-CONSTANT +UNICODE-A0-B0-TO-ISO-8859-5+ ...)
; processing (DEFINE-CONSTANT +UNICODE-400-460-TO-ISO-8859-5+ ...)
; processing (DEFINE-UNIBYTE-ENCODER :ISO-8859-5 ...)
; processing (DEFINE-CONSTANT +ISO-8859-5-TO-UNICODE+ ...)
; processing (DEFINE-UNIBYTE-DECODER :ISO-8859-5 ...)
; processing (DEFINE-CHARACTER-ENCODING :ISO-8859-6 ...)
; processing (DEFINE-CONSTANT +UNICODE-A0-B0-TO-ISO-8859-6+ ...)
; processing (DEFINE-CONSTANT +UNICODE-608-658-TO-ISO-8859-6+ ...)
; processing (DEFINE-UNIBYTE-ENCODER :ISO-8859-6 ...)
; processing (DEFINE-CONSTANT +ISO-8859-6-TO-UNICODE+ ...)
; processing (DEFINE-UNIBYTE-DECODER :ISO-8859-6 ...)
; processing (DEFINE-CHARACTER-ENCODING :ISO-8859-7 ...)
; processing (DEFINE-CONSTANT +UNICODE-A0-C0-TO-ISO-8859-7+ ...)
; processing (DEFINE-CONSTANT +UNICODE-378-3D0-TO-ISO-8859-7+ ...)
; processing (DEFINE-CONSTANT +UNICODE-2010-2020-TO-ISO-8859-7+ ...)
; processing (DEFINE-CONSTANT +UNICODE-20AC-20B0-TO-ISO-8859-7+ ...)
; processing (DEFINE-UNIBYTE-ENCODER :ISO-8859-7 ...)
; processing (DEFINE-CONSTANT +ISO-8859-7-TO-UNICODE+ ...)
; processing (DEFINE-UNIBYTE-DECODER :ISO-8859-7 ...)
; processing (DEFINE-CHARACTER-ENCODING :ISO-8859-8 ...)
; processing (DEFINE-CONSTANT +UNICODE-A0-F8-TO-ISO-8859-8+ ...)
; processing (DEFINE-CONSTANT +UNICODE-5D0-5F0-TO-ISO-8859-8+ ...)
; processing (DEFINE-CONSTANT +UNICODE-2008-2018-TO-ISO-8859-8+ ...)
; processing (DEFINE-UNIBYTE-ENCODER :ISO-8859-8 ...)
; processing (DEFINE-CONSTANT +ISO-8859-8-TO-UNICODE+ ...)
; processing (DEFINE-UNIBYTE-DECODER :ISO-8859-8 ...)
; processing (DEFINE-CHARACTER-ENCODING :ISO-8859-9 ...)
; processing (DEFINE-CONSTANT +UNICODE-D0-100-TO-ISO-8859-9+ ...)
; processing (DEFINE-CONSTANT +UNICODE-118-160-TO-ISO-8859-9+ ...)
; processing (DEFINE-UNIBYTE-ENCODER :ISO-8859-9 ...)
; processing (DEFINE-CONSTANT +ISO-8859-9-TO-UNICODE+ ...)
; processing (DEFINE-UNIBYTE-DECODER :ISO-8859-9 ...)
; processing (DEFINE-CHARACTER-ENCODING :ISO-8859-10 ...)
; processing (DEFINE-CONSTANT +UNICODE-A0-180-TO-ISO-8859-10+ ...)
; processing (DEFINE-UNIBYTE-ENCODER :ISO-8859-10 ...)
; processing (DEFINE-CONSTANT +ISO-8859-10-TO-UNICODE+ ...)
; processing (DEFINE-UNIBYTE-DECODER :ISO-8859-10 ...)
; processing (DEFINE-CHARACTER-ENCODING :ISO-8859-11 ...)
; processing (DEFINE-UNIBYTE-ENCODER :ISO-8859-11 ...)
; processing (DEFINE-UNIBYTE-DECODER :ISO-8859-11 ...)
; processing (DEFINE-CHARACTER-ENCODING :ISO-8859-13 ...)
; processing (DEFINE-CONSTANT +UNICODE-A0-180-TO-ISO-8859-13+ ...)
; processing (DEFINE-CONSTANT +UNICODE-2018-2020-TO-ISO-8859-13+ ...)
; processing (DEFINE-UNIBYTE-ENCODER :ISO-8859-13 ...)
; processing (DEFINE-CONSTANT +ISO-8859-13-TO-UNICODE+ ...)
; processing (DEFINE-UNIBYTE-DECODER :ISO-8859-13 ...)
; processing (DEFINE-CHARACTER-ENCODING :ISO-8859-14 ...)
; processing (DEFINE-CONSTANT +UNICODE-A0-100-TO-ISO-8859-14+ ...)
; processing (DEFINE-CONSTANT +UNICODE-108-128-TO-ISO-8859-14+ ...)
; processing (DEFINE-CONSTANT +UNICODE-170-180-TO-ISO-8859-14+ ...)
; processing (DEFINE-CONSTANT +UNICODE-1E00-1E88-TO-ISO-8859-14+ ...)
; processing (DEFINE-CONSTANT +UNICODE-1EF0-1EF8-TO-ISO-8859-14+ ...)
; processing (DEFINE-UNIBYTE-ENCODER :ISO-8859-14 ...)
; processing (DEFINE-CONSTANT +ISO-8859-14-TO-UNICODE+ ...)
; processing (DEFINE-UNIBYTE-DECODER :ISO-8859-14 ...)
; processing (DEFINE-CHARACTER-ENCODING :ISO-8859-15 ...)
; processing (DEFINE-CONSTANT +UNICODE-A0-100-TO-ISO-8859-15+ ...)
; processing (DEFINE-CONSTANT +UNICODE-150-180-TO-ISO-8859-15+ ...)
; processing (DEFINE-UNIBYTE-ENCODER :ISO-8859-15 ...)
; processing (DEFINE-CONSTANT +ISO-8859-15-TO-UNICODE+ ...)
; processing (DEFINE-UNIBYTE-DECODER :ISO-8859-15 ...)
; processing (DEFINE-CHARACTER-ENCODING :ISO-8859-16 ...)
; processing (DEFINE-CONSTANT +UNICODE-A0-180-TO-ISO-8859-16+ ...)
; processing (DEFINE-CONSTANT +UNICODE-218-220-TO-ISO-8859-16+ ...)
; processing (DEFINE-CONSTANT +UNICODE-2018-2020-TO-ISO-8859-16+ ...)
; processing (DEFINE-UNIBYTE-ENCODER :ISO-8859-16 ...)
; processing (DEFINE-CONSTANT +ISO-8859-16-TO-UNICODE+ ...)
; processing (DEFINE-UNIBYTE-DECODER :ISO-8859-16 ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/babel/src/enc-iso-8859-tmp5P00NUE.fasl
; compilation finished in 0:00:00.484
; compiling file "/usr/share/common-lisp/source/babel/src/enc-unicode.lisp" (written 19 JUL 2020 06:57:54 AM):
; processing (IN-PACKAGE #:BABEL-ENCODINGS)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...)
; processing (DEFMACRO F-ASH ...)
; processing (DEFMACRO F-LOGIOR ...)
; processing (DEFMACRO F-LOGAND ...)
; processing (DEFMACRO F-LOGXOR ...)
; processing (DEFINE-CHARACTER-ENCODING :UTF-8 ...)
; processing (DEFINE-CONDITION INVALID-UTF8-STARTER-BYTE ...)
; processing (DEFINE-CONDITION INVALID-UTF8-CONTINUATION-BYTE ...)
; processing (DEFINE-CONDITION OVERLONG-UTF8-SEQUENCE ...)
; processing (DEFINE-OCTET-COUNTER :UTF-8 ...)
; processing (DEFINE-CODE-POINT-COUNTER :UTF-8 ...)
; processing (DEFINE-ENCODER :UTF-8 ...)
; processing (DEFINE-DECODER :UTF-8 ...)
; processing (DEFINE-CHARACTER-ENCODING :UTF-8B ...)
; processing (DEFINE-OCTET-COUNTER :UTF-8B ...)
; processing (DEFINE-CODE-POINT-COUNTER :UTF-8B ...)
; processing (DEFINE-ENCODER :UTF-8B ...)
; processing (DEFINE-DECODER :UTF-8B ...)
; processing (DEFMACRO UTF16-OCTET-COUNTER ...)
; processing (DEFMACRO UTF-16-COMBINE-SURROGATE-PAIRS ...)
; processing (DEFMACRO DEFINE-UTF-16 ...)
; processing (DEFINE-CHARACTER-ENCODING :UTF-16 ...)
; processing (DEFINE-UTF-16 :UTF-16)
; processing (DEFINE-CHARACTER-ENCODING :UTF-16LE ...)
; processing (DEFINE-UTF-16 :UTF-16LE ...)
; processing (DEFINE-CHARACTER-ENCODING :UTF-16BE ...)
; processing (DEFINE-UTF-16 :UTF-16BE ...)
; processing (DEFMACRO DEFINE-UCS ...)
; processing (DEFINE-CHARACTER-ENCODING :UTF-32 ...)
; processing (DEFINE-UCS :UTF-32 ...)
; processing (DEFINE-CHARACTER-ENCODING :UTF-32LE ...)
; processing (DEFINE-UCS :UTF-32LE ...)
; processing (DEFINE-CHARACTER-ENCODING :UTF-32BE ...)
; processing (DEFINE-UCS :UTF-32BE ...)
; processing (DEFINE-CHARACTER-ENCODING :UCS-2 ...)
; processing (DEFINE-UCS :UCS-2 ...)
; processing (DEFINE-CHARACTER-ENCODING :UCS-2LE ...)
; processing (DEFINE-UCS :UCS-2LE ...)
; processing (DEFINE-CHARACTER-ENCODING :UCS-2BE ...)
; processing (DEFINE-UCS :UCS-2BE ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/babel/src/enc-unicode-tmp94JO3ZTC.fasl
; compilation finished in 0:00:01.016
; compiling file "/usr/share/common-lisp/source/babel/src/enc-cp437.lisp" (written 19 JUL 2020 06:57:54 AM):
; processing (IN-PACKAGE #:BABEL-ENCODINGS)
; processing (DEFINE-CHARACTER-ENCODING :CP437 ...)
; processing (DEFINE-CONSTANT +CP437-TO-UNICODE+ ...)
; processing (DEFINE-UNIBYTE-DECODER :CP437 ...)
; processing (DEFINE-UNIBYTE-ENCODER :CP437 ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/babel/src/enc-cp437-tmp6OFDFVAR.fasl
; compilation finished in 0:00:00.040
; compiling file "/usr/share/common-lisp/source/babel/src/enc-cp1251.lisp" (written 19 JUL 2020 06:57:54 AM):
; processing (IN-PACKAGE #:BABEL-ENCODINGS)
; processing (DEFINE-CHARACTER-ENCODING :CP1251 ...)
; processing (DEFINE-CONSTANT +CP1251-TO-UNICODE+ ...)
; processing (DEFINE-UNIBYTE-DECODER :CP1251 ...)
; processing (DEFINE-CONSTANT +UNICODE-A0-BF-TO-CP1251+ ...)
; processing (DEFINE-CONSTANT +UNICODE-0-97-TO-CP1251+ ...)
; processing (DEFINE-CONSTANT +UNICODE-10-3F-TO-CP1251+ ...)
; processing (DEFINE-UNIBYTE-ENCODER :CP1251 ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/babel/src/enc-cp1251-tmpRYWTYMDY.fasl
; compilation finished in 0:00:00.036
; compiling file "/usr/share/common-lisp/source/babel/src/enc-cp1252.lisp" (written 19 JUL 2020 06:57:54 AM):
; processing (IN-PACKAGE #:BABEL-ENCODINGS)
; processing (DEFINE-CHARACTER-ENCODING :CP1252 ...)
; processing (DEFINE-CONSTANT +CP1252-TO-UNICODE+ ...)
; processing (DEFINE-UNIBYTE-DECODER :CP1252 ...)
; processing (DEFINE-CONSTANT +UNICODE-0152-017E-CP1252+ ...)
; processing (DEFINE-CONSTANT +UNICODE-2013-203A-CP1252+ ...)
; processing (DEFINE-UNIBYTE-ENCODER :CP1252 ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/babel/src/enc-cp1252-tmpW78F18LW.fasl
; compilation finished in 0:00:00.036
; compiling file "/usr/share/common-lisp/source/babel/src/jpn-table.lisp" (written 19 JUL 2020 06:57:54 AM):
; processing (IN-PACKAGE #:BABEL-ENCODINGS)
; processing (DEFVAR *CP932-ONLY* ...)
; processing (DEFVAR *EUCJP-ONLY* ...)
; processing (DEFVAR *EUCJP* ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/babel/src/jpn-table-tmpWUHTUDVN.fasl
; compilation finished in 0:00:00.412
; compiling file "/usr/share/common-lisp/source/babel/src/enc-jpn.lisp" (written 19 JUL 2020 06:57:54 AM):
; processing (IN-PACKAGE #:BABEL-ENCODINGS)
; processing (DEFVAR *EUCJP-TO-UCS-HASH* ...)
; processing (DEFVAR *UCS-TO-EUCJP-HASH* ...)
; processing (DEFVAR *CP932-TO-UCS-HASH* ...)
; processing (DEFVAR *UCS-TO-CP932-HASH* ...)
; processing (DOLIST (I #) ...)
; processing (FLET (#) ...)
; processing (LOOP FOR ...)
; processing (LOOP FOR ...)
; processing (LET (#) ...)
; processing (DEFUN EUCJP-TO-UCS ...)
; processing (DEFUN UCS-TO-EUCJP ...)
; processing (DEFUN CP932-TO-UCS ...)
; processing (DEFUN UCS-TO-CP932 ...)
; processing (DEFINE-CHARACTER-ENCODING :EUCJP ...)
; processing (DEFINE-OCTET-COUNTER :EUCJP ...)
; processing (DEFINE-CODE-POINT-COUNTER :EUCJP ...)
; processing (DEFINE-ENCODER :EUCJP ...)
; processing (DEFINE-DECODER :EUCJP ...)
; processing (DEFINE-CHARACTER-ENCODING :CP932 ...)
; processing (DEFINE-OCTET-COUNTER :CP932 ...)
; processing (DEFINE-CODE-POINT-COUNTER :CP932 ...)
; processing (DEFINE-ENCODER :CP932 ...)
; processing (DEFINE-DECODER :CP932 ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/babel/src/enc-jpn-tmpCK73UFEK.fasl
; compilation finished in 0:00:00.236
; compiling file "/usr/share/common-lisp/source/babel/src/enc-gbk.lisp" (written 19 JUL 2020 06:57:54 AM):
; processing (IN-PACKAGE #:BABEL-ENCODINGS)
; processing (DEFVAR *GBK-UNICODE-MAPPING*)
; processing (DEFCONSTANT +GBK2-OFFSET+ ...)
; processing (DEFCONSTANT +GBK3-OFFSET+ ...)
; processing (DEFCONSTANT +GBK4-OFFSET+ ...)
; processing (DEFCONSTANT +GBK1-OFFSET+ ...)
; processing (DEFCONSTANT +GBK5-OFFSET+ ...)
; processing (DEFINE-CHARACTER-ENCODING :GBK ...)
; processing (DEFINE-CONDITION INVALID-GBK-BYTE ...)
; processing (DEFINE-CONDITION INVALID-GBK-CHARACTER ...)
; processing (DEFINE-OCTET-COUNTER :GBK ...)
; processing (DEFINE-CODE-POINT-COUNTER :GBK ...)
; processing (DEFINE-ENCODER :GBK ...)
; processing (DEFINE-DECODER :GBK ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/babel/src/enc-gbk-tmpEBEIAP0J.fasl
; compilation finished in 0:00:00.100
; compiling file "/usr/share/common-lisp/source/babel/src/enc-koi8.lisp" (written 19 JUL 2020 06:57:54 AM):
; processing (IN-PACKAGE #:BABEL-ENCODINGS)
; processing (DEFINE-CHARACTER-ENCODING :KOI8-RU ...)
; processing (DEFINE-CONSTANT +KOI8-RU-TO-UNICODE+ ...)
; processing (DEFINE-UNIBYTE-DECODER :KOI8-RU ...)
; processing (DEFINE-CONSTANT +UNICODE-04->KOI8-RU+ ...)
; processing (DEFINE-UNIBYTE-ENCODER :KOI8-RU ...)
; processing (DEFINE-CHARACTER-ENCODING :KOI8-R ...)
; processing (DEFINE-CONSTANT +KOI8-R-TO-UNICODE+ ...)
; processing (DEFINE-UNIBYTE-DECODER :KOI8-R ...)
; processing (DEFINE-CONSTANT +UNICODE-X04->KOI8-R+ ...)
; processing (DEFINE-CONSTANT +UNICODE-X25->KOI8-R+ ...)
; processing (DEFINE-UNIBYTE-ENCODER :KOI8-R ...)
; processing (DEFINE-CHARACTER-ENCODING :KOI8-U ...)
; processing (DEFINE-CONSTANT +KOI8-U-TO-UNICODE+ ...)
; processing (DEFINE-UNIBYTE-DECODER :KOI8-U ...)
; processing (DEFINE-CONSTANT +UNICODE-X04->KOI8-U+ ...)
; processing (DEFINE-CONSTANT +UNICODE-X25->KOI8-U+ ...)
; processing (DEFINE-UNIBYTE-ENCODER :KOI8-U ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/babel/src/enc-koi8-tmpSE943D3D.fasl
; compilation finished in 0:00:00.112
; compiling file "/usr/share/common-lisp/source/babel/src/external-format.lisp" (written 19 JUL 2020 06:57:54 AM):
; processing (IN-PACKAGE #:BABEL)
; processing (DEFVAR *DEFAULT-EOL-STYLE* ...)
; processing (DEFTYPE EOL-STYLE ...)
; processing (DEFCLASS EXTERNAL-FORMAT ...)
; processing (DEFMETHOD PRINT-OBJECT ...)
; processing (DEFUN MAKE-EXTERNAL-FORMAT ...)
; processing (DEFUN ENSURE-EXTERNAL-FORMAT ...)
; processing (DEFUN EXTERNAL-FORMAT-EQUAL ...)
; processing (DECLAIM (INLINE LOOKUP-MAPPING))
; processing (DEFUN LOOKUP-MAPPING ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/babel/src/external-format-tmpN5RKE5P2.fasl
; compilation finished in 0:00:00.084
; compiling file "/usr/share/common-lisp/source/babel/src/strings.lisp" (written 19 JUL 2020 06:57:54 AM):
; processing (IN-PACKAGE #:BABEL)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...)
; processing (DEFMACRO UB-GET ...)
; processing (DEFMACRO UB-SET ...)
; processing (DEFMACRO STRING-GET ...)
; processing (DEFMACRO STRING-SET ...)
; processing (DEFCONSTANT UNICODE-CHAR-CODE-LIMIT ...)
; processing (DEFTYPE UNICODE-CHAR ...)
; processing (DEFTYPE SIMPLE-UNICODE-STRING ...)
; processing (DEFTYPE UNICODE-STRING ...)
; processing (DEFPARAMETER *STRING-VECTOR-MAPPINGS* ...)
; processing (DEFPARAMETER *SIMPLE-BASE-STRING-VECTOR-MAPPINGS* ...)
; processing (DEFUN CHECK-VECTOR-BOUNDS ...)
; processing (DEFMACRO WITH-SIMPLE-VECTOR ...)
; processing (DEFMACRO WITH-CHECKED-SIMPLE-VECTOR ...)
; processing (DECLAIM (INLINE OCTETS-TO-STRING ...))
; processing (DEFUN OCTETS-TO-STRING ...)
; processing (DEFUN BOM-VECTOR ...)
; processing (DEFUN STRING-TO-OCTETS ...)
; processing (DEFUN CONCATENATE-STRINGS-TO-OCTETS ...)
; processing (DEFUN STRING-SIZE-IN-OCTETS ...)
; processing (DEFUN VECTOR-SIZE-IN-CHARS ...)
; processing (DECLAIM (NOTINLINE OCTETS-TO-STRING ...))
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/babel/src/strings-tmpNQZ6T1LT.fasl
; compilation finished in 0:00:11.548
; compiling file "/usr/share/common-lisp/source/babel/src/gbk-map.lisp" (written 19 JUL 2020 06:57:54 AM):
; processing (IN-PACKAGE #:BABEL-ENCODINGS)
; processing (DEFPARAMETER *GBK-UNICODE-MAPPING* ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/babel/src/gbk-map-tmpWLS9DP2S.fasl
; compilation finished in 0:00:00.584
; compiling file "/usr/share/common-lisp/source/babel/src/sharp-backslash.lisp" (written 19 JUL 2020 06:57:54 AM):
; processing (IN-PACKAGE #:BABEL)
; processing (DEFUN SHARP-BACKSLASH-READER ...)
; processing (DEFUN MAKE-SHARP-BACKSLASH-READER ...)
; processing (DEFMACRO ENABLE-SHARP-BACKSLASH-SYNTAX ...)
; processing (DEFUN SET-SHARP-BACKSLASH-SYNTAX-IN-READTABLE ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/babel/src/sharp-backslash-tmp8VCF5G6M.fasl
; compilation finished in 0:00:00.036
; compiling file "/usr/share/common-lisp/source/cl-cffi/src/cffi-sbcl.lisp" (written 03 APR 2021 02:35:42 PM):
; processing (DEFPACKAGE #:CFFI-SYS ...)
; processing (IN-PACKAGE #:CFFI-SYS)
; processing (PUSHNEW (QUOTE FLAT-NAMESPACE) ...)
; processing (DECLAIM (INLINE CANONICALIZE-SYMBOL-NAME-CASE))
; processing (DEFUN CANONICALIZE-SYMBOL-NAME-CASE ...)
; processing (DEFTYPE FOREIGN-POINTER ...)
; processing (DECLAIM (INLINE POINTERP))
; processing (DEFUN POINTERP ...)
; processing (DECLAIM (INLINE POINTER-EQ))
; processing (DEFUN POINTER-EQ ...)
; processing (DECLAIM (INLINE NULL-POINTER))
; processing (DEFUN NULL-POINTER ...)
; processing (DECLAIM (INLINE NULL-POINTER-P))
; processing (DEFUN NULL-POINTER-P ...)
; processing (DECLAIM (INLINE INC-POINTER))
; processing (DEFUN INC-POINTER ...)
; processing (DECLAIM (INLINE MAKE-POINTER))
; processing (DEFUN MAKE-POINTER ...)
; processing (DECLAIM (INLINE POINTER-ADDRESS))
; processing (DEFUN POINTER-ADDRESS ...)
; processing (DECLAIM (INLINE %FOREIGN-ALLOC))
; processing (DEFUN %FOREIGN-ALLOC ...)
; processing (DECLAIM (INLINE FOREIGN-FREE))
; processing (DEFUN FOREIGN-FREE ...)
; processing (DEFMACRO WITH-FOREIGN-POINTER ...)
; processing (DECLAIM (INLINE MAKE-SHAREABLE-BYTE-VECTOR))
; processing (DEFUN MAKE-SHAREABLE-BYTE-VECTOR ...)
; processing (DEFMACRO WITH-POINTER-TO-VECTOR-DATA ...)
; processing (DEFMACRO DEFINE-MEM-ACCESSORS ...)
; processing (DEFMACRO DEFINE-TYPE-MAPPING ...)
; processing (DEFINE-TYPE-MAPPING (# # ...) ...)
; processing (DEFUN %FOREIGN-TYPE-SIZE ...)
; processing (DEFUN %FOREIGN-TYPE-ALIGNMENT ...)
; processing (DEFUN FOREIGN-FUNCALL-TYPE-AND-ARGS ...)
; processing (DEFMACRO %%FOREIGN-FUNCALL ...)
; processing (DEFMACRO %FOREIGN-FUNCALL ...)
; processing (DEFMACRO %FOREIGN-FUNCALL-POINTER ...)
; processing (DEFVAR *CALLBACKS* ...)
; processing (DEFMACRO %DEFCALLBACK ...)
; processing (DEFUN %CALLBACK ...)
; processing (DECLAIM (INLINE %LOAD-FOREIGN-LIBRARY))
; processing (DEFUN %LOAD-FOREIGN-LIBRARY ...)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...)
; processing (DEFUN %CLOSE-FOREIGN-LIBRARY ...)
; processing (DEFUN NATIVE-NAMESTRING ...)
; processing (DEFUN %FOREIGN-SYMBOL-POINTER ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-cffi/src/cffi-sbcl-tmp8DMZV8XU.fasl
; compilation finished in 0:00:00.916
; compiling file "/usr/share/common-lisp/source/cl-cffi/src/package.lisp" (written 03 APR 2021 02:35:42 PM):
; processing (IN-PACKAGE #:CL-USER)
; processing (DEFPACKAGE #:CFFI ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-cffi/src/package-tmpEGA125WT.fasl
; compilation finished in 0:00:00.008
; compiling file "/usr/share/common-lisp/source/cl-cffi/src/utils.lisp" (written 03 APR 2021 02:35:42 PM):
; processing (IN-PACKAGE #:CFFI)
; processing (DEFMACRO DISCARD-DOCSTRING ...)
; processing (DEFUN SINGLE-BIT-P ...)
; processing (DEFUN WARN-IF-KW-OR-BELONGS-TO-CL ...)
; processing (DEFINE-CONDITION OBSOLETE-ARGUMENT-WARNING ...)
; processing (DEFUN WARN-OBSOLETE-ARGUMENT ...)
; processing (DEFUN SPLIT-IF ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-cffi/src/utils-tmpE9RDNCMC.fasl
; compilation finished in 0:00:00.080
; compiling file "/usr/share/common-lisp/source/cl-cffi/src/libraries.lisp" (written 03 APR 2021 02:35:42 PM):
; processing (IN-PACKAGE #:CFFI)
; processing (DEFUN EXPLODE-PATH-ENVIRONMENT-VARIABLE ...)
; processing (DEFUN DARWIN-FALLBACK-LIBRARY-PATH ...)
; processing (DEFVAR *FOREIGN-LIBRARY-DIRECTORIES* ...)
; processing (DEFUN FALLBACK-DARWIN-FRAMEWORK-DIRECTORIES ...)
; processing (DEFVAR *DARWIN-FRAMEWORK-DIRECTORIES* ...)
; processing (DEFUN MINI-EVAL ...)
; processing (DEFUN PARSE-DIRECTORIES ...)
; processing (DEFUN FIND-FILE ...)
; processing (DEFUN FIND-DARWIN-FRAMEWORK ...)
; processing (DEFVAR *FOREIGN-LIBRARIES* ...)
; processing (DEFCLASS FOREIGN-LIBRARY ...)
; processing (DEFMETHOD PRINT-OBJECT ...)
; processing (DEFINE-CONDITION FOREIGN-LIBRARY-UNDEFINED-ERROR ...)
; processing (DEFUN GET-FOREIGN-LIBRARY ...)
; processing (DEFUN (SETF GET-FOREIGN-LIBRARY) ...)
; processing (DEFUN FOREIGN-LIBRARY-TYPE ...)
; processing (DEFUN FOREIGN-LIBRARY-PATHNAME ...)
; processing (DEFUN %FOREIGN-LIBRARY-SPEC ...)
; processing (DEFUN FOREIGN-LIBRARY-SPEC ...)
; processing (DEFUN FOREIGN-LIBRARY-OPTIONS ...)
; processing (DEFUN FOREIGN-LIBRARY-SEARCH-PATH ...)
; processing (DEFUN FOREIGN-LIBRARY-LOADED-P ...)
; processing (DEFUN LIST-FOREIGN-LIBRARIES ...)
; processing (DEFUN CLEAN-SPEC-UP ...)
; processing (DEFMETHOD INITIALIZE-INSTANCE ...)
; processing (DEFUN REGISTER-FOREIGN-LIBRARY ...)
; processing (DEFMACRO DEFINE-FOREIGN-LIBRARY ...)
; processing (DEFINE-CONDITION LOAD-FOREIGN-LIBRARY-ERROR ...)
; processing (DEFUN READ-NEW-VALUE ...)
; processing (DEFUN FL-ERROR ...)
; processing (DEFUN LOAD-DARWIN-FRAMEWORK ...)
; processing (DEFUN REPORT-SIMPLE-ERROR ...)
; processing (DEFUN LOAD-FOREIGN-LIBRARY-PATH ...)
; processing (DEFUN TRY-FOREIGN-LIBRARY-ALTERNATIVES ...)
; processing (DEFPARAMETER *CFFI-FEATURE-SUFFIX-MAP* ...)
; processing (DEFUN DEFAULT-LIBRARY-SUFFIX ...)
; processing (DEFUN LOAD-FOREIGN-LIBRARY-HELPER ...)
; processing (DEFUN %DO-LOAD-FOREIGN-LIBRARY ...)
; processing (DEFUN FILTER-PATHNAME ...)
; processing (DEFUN LOAD-FOREIGN-LIBRARY ...)
; processing (DEFMACRO USE-FOREIGN-LIBRARY ...)
; processing (DEFUN CLOSE-FOREIGN-LIBRARY ...)
; processing (DEFUN RELOAD-FOREIGN-LIBRARIES ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-cffi/src/libraries-tmpGTSGBQIR.fasl
; compilation finished in 0:00:00.532
; compiling file "/usr/share/common-lisp/source/cl-cffi/src/early-types.lisp" (written 03 APR 2021 02:35:42 PM):
; processing (IN-PACKAGE #:CFFI)
; processing (DEFVAR *DEFAULT-TYPE-PARSERS* ...)
; processing (DEFVAR *STRUCT-TYPE-PARSERS* ...)
; processing (DEFVAR *UNION-TYPE-PARSERS* ...)
; processing (DEFINE-CONDITION CFFI-ERROR ...)
; processing (DEFINE-CONDITION FOREIGN-TYPE-ERROR ...)
; processing (DEFUN FOREIGN-TYPE-ERROR/COMPOUND-NAME ...)
; processing (DEFINE-CONDITION SIMPLE-FOREIGN-TYPE-ERROR ...)
; processing (DEFUN SIMPLE-FOREIGN-TYPE-ERROR ...)
; processing (DEFINE-CONDITION UNDEFINED-FOREIGN-TYPE-ERROR ...)
; processing (DEFUN UNDEFINED-FOREIGN-TYPE-ERROR ...)
; processing (DEFTYPE C-NAMESPACE-NAME ...)
; processing (DEFUN NAMESPACE-TABLE ...)
; processing (DEFUN FIND-TYPE-PARSER ...)
; processing (DEFUN FIND-DEFAULT-TYPE-PARSER ...)
; processing (DEFUN (SETF FIND-TYPE-PARSER) ...)
; processing (DEFUN UNDEFINE-FOREIGN-TYPE ...)
; processing (DEFMACRO DEFINE-PARSE-METHOD ...)
; processing (DEFUN NOTICE-FOREIGN-TYPE ...)
; processing (DEFGENERIC CANONICALIZE ...)
; processing (DEFGENERIC AGGREGATEP ...)
; processing (DEFGENERIC FOREIGN-TYPE-ALIGNMENT ...)
; processing (DEFGENERIC FOREIGN-TYPE-SIZE ...)
; processing (DEFGENERIC UNPARSE-TYPE ...)
; processing (DEFCLASS FOREIGN-TYPE ...)
; processing (DEFMETHOD MAKE-LOAD-FORM ...)
; processing (DEFMETHOD FOREIGN-TYPE-SIZE ...)
; processing (DEFCLASS NAMED-FOREIGN-TYPE ...)
; processing (DEFMETHOD PRINT-OBJECT ...)
; processing (DEFMETHOD UNPARSE-TYPE ...)
; processing (DEFCLASS FOREIGN-BUILT-IN-TYPE ...)
; processing (DEFMETHOD CANONICALIZE ...)
; processing (DEFMETHOD AGGREGATEP ...)
; processing (DEFMETHOD FOREIGN-TYPE-ALIGNMENT ...)
; processing (DEFMETHOD FOREIGN-TYPE-SIZE ...)
; processing (DEFMETHOD UNPARSE-TYPE ...)
; processing (DEFMETHOD PRINT-OBJECT ...)
; processing (DEFVAR *BUILT-IN-FOREIGN-TYPES* ...)
; processing (DEFMACRO DEFINE-BUILT-IN-FOREIGN-TYPE ...)
; processing (DEFCLASS FOREIGN-POINTER-TYPE ...)
; processing (LET (#) ...)
; processing (DEFMETHOD UNPARSE-TYPE ...)
; processing (DEFMETHOD PRINT-OBJECT ...)
; processing (DEFGENERIC BARE-STRUCT-TYPE-P ...)
; processing (DEFMETHOD BARE-STRUCT-TYPE-P ...)
; processing (DEFCLASS FOREIGN-STRUCT-TYPE ...)
; processing (DEFUN SLOTS-IN-ORDER ...)
; processing (DEFMETHOD CANONICALIZE ...)
; processing (DEFMETHOD UNPARSE-TYPE ...)
; processing (DEFMETHOD AGGREGATEP ...)
; processing (DEFMETHOD FOREIGN-TYPE-SIZE ...)
; processing (DEFMETHOD FOREIGN-TYPE-ALIGNMENT ...)
; processing (DEFCLASS FOREIGN-UNION-TYPE ...)
; processing (DEFMETHOD CANONICALIZE ...)
; processing (DEFCLASS FOREIGN-TYPE-ALIAS ...)
; processing (DEFMETHOD CANONICALIZE ...)
; processing (DEFMETHOD AGGREGATEP ...)
; processing (DEFMETHOD FOREIGN-TYPE-ALIGNMENT ...)
; processing (DEFMETHOD FOREIGN-TYPE-SIZE ...)
; processing (DEFCLASS FOREIGN-TYPEDEF ...)
; processing (DEFUN FOLLOW-TYPEDEFS ...)
; processing (DEFMETHOD BARE-STRUCT-TYPE-P ...)
; processing (DEFUN STRUCTURE-SLOTS ...)
; processing (DEFCLASS TRANSLATABLE-FOREIGN-TYPE ...)
; processing (DEFCLASS ENHANCED-FOREIGN-TYPE ...)
; processing (DEFMETHOD INITIALIZE-INSTANCE ...)
; processing (DEFMETHOD UNPARSE-TYPE ...)
; processing (DEFUN CHECK-FOR-TYPEDEF-CYCLES ...)
; processing (DEFUN PARSE-TYPE ...)
; processing (DEFUN ENSURE-PARSED-BASE-TYPE ...)
; processing (DEFUN CANONICALIZE-FOREIGN-TYPE ...)
; processing (DEFGENERIC TRANSLATE-TO-FOREIGN ...)
; processing (DEFGENERIC TRANSLATE-INTO-FOREIGN-MEMORY ...)
; processing (DEFGENERIC TRANSLATE-AGGREGATE-TO-FOREIGN ...)
; processing (DEFGENERIC TRANSLATE-FROM-FOREIGN ...)
; processing (DEFGENERIC FREE-TRANSLATED-OBJECT ...)
; processing (DEFVAR *RUNTIME-TRANSLATOR-FORM*)
; processing (DEFGENERIC EXPAND-FROM-FOREIGN ...)
; processing (DEFMETHOD EXPAND-FROM-FOREIGN ...)
; processing (DEFMETHOD EXPAND-FROM-FOREIGN ...)
; processing (DEFGENERIC EXPAND-TO-FOREIGN ...)
; processing (DEFMETHOD EXPAND-TO-FOREIGN ...)
; processing (DEFMETHOD EXPAND-TO-FOREIGN ...)
; processing (DEFGENERIC EXPAND-INTO-FOREIGN-MEMORY ...)
; processing (DEFMETHOD EXPAND-INTO-FOREIGN-MEMORY ...)
; processing (DEFMETHOD EXPAND-INTO-FOREIGN-MEMORY ...)
; processing (DEFGENERIC EXPAND-TO-FOREIGN-DYN ...)
; processing (DEFMETHOD EXPAND-TO-FOREIGN-DYN ...)
; processing (DEFUN FOREIGN-EXPAND-RUNTIME-TRANSLATOR-OR-BINDING ...)
; processing (DEFMETHOD EXPAND-TO-FOREIGN-DYN ...)
; processing (DEFGENERIC EXPAND-TO-FOREIGN-DYN-INDIRECT ...)
; processing (DEFMETHOD EXPAND-TO-FOREIGN-DYN-INDIRECT ...)
; processing (DEFMETHOD EXPAND-TO-FOREIGN-DYN-INDIRECT ...)
; processing (DEFMETHOD EXPAND-TO-FOREIGN-DYN-INDIRECT ...)
; processing (DEFMETHOD EXPAND-TO-FOREIGN-DYN-INDIRECT ...)
; processing (DEFMETHOD EXPAND-TO-FOREIGN-DYN-INDIRECT ...)
; processing (DEFUN CONVERT-TO-FOREIGN ...)
; processing (DEFINE-COMPILER-MACRO CONVERT-TO-FOREIGN ...)
; processing (DEFUN CONVERT-FROM-FOREIGN ...)
; processing (DEFINE-COMPILER-MACRO CONVERT-FROM-FOREIGN ...)
; processing (DEFUN CONVERT-INTO-FOREIGN-MEMORY ...)
; processing (DEFINE-COMPILER-MACRO CONVERT-INTO-FOREIGN-MEMORY ...)
; processing (DEFUN FREE-CONVERTED-OBJECT ...)
; processing (DEFCLASS ENHANCED-TYPEDEF ...)
; processing (DEFMETHOD TRANSLATE-TO-FOREIGN ...)
; processing (DEFMETHOD TRANSLATE-INTO-FOREIGN-MEMORY ...)
; processing (DEFMETHOD TRANSLATE-FROM-FOREIGN ...)
; processing (DEFMETHOD FREE-TRANSLATED-OBJECT ...)
; processing (DEFMETHOD EXPAND-FROM-FOREIGN ...)
; processing (DEFMETHOD EXPAND-TO-FOREIGN ...)
; processing (DEFMETHOD EXPAND-TO-FOREIGN-DYN ...)
; processing (DEFMETHOD EXPAND-INTO-FOREIGN-MEMORY ...)
; processing (DEFMACRO DEFINE-FOREIGN-TYPE ...)
; processing (DEFMACRO DEFCTYPE ...)
; processing (DEFMACRO DEFCTYPE* ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-cffi/src/early-types-tmpRCRZ6VP.fasl
; compilation finished in 0:00:01.100
; compiling file "/usr/share/common-lisp/source/cl-cffi/src/types.lisp" (written 03 APR 2021 02:35:42 PM):
; processing (IN-PACKAGE #:CFFI)
; processing (DEFINE-BUILT-IN-FOREIGN-TYPE :CHAR)
; processing (DEFINE-BUILT-IN-FOREIGN-TYPE :UNSIGNED-CHAR)
; processing (DEFINE-BUILT-IN-FOREIGN-TYPE :SHORT)
; processing (DEFINE-BUILT-IN-FOREIGN-TYPE :UNSIGNED-SHORT)
; processing (DEFINE-BUILT-IN-FOREIGN-TYPE :INT)
; processing (DEFINE-BUILT-IN-FOREIGN-TYPE :UNSIGNED-INT)
; processing (DEFINE-BUILT-IN-FOREIGN-TYPE :LONG)
; processing (DEFINE-BUILT-IN-FOREIGN-TYPE :UNSIGNED-LONG)
; processing (DEFINE-BUILT-IN-FOREIGN-TYPE :FLOAT)
; processing (DEFINE-BUILT-IN-FOREIGN-TYPE :DOUBLE)
; processing (DEFINE-BUILT-IN-FOREIGN-TYPE :VOID)
; processing (PROGN (DEFINE-BUILT-IN-FOREIGN-TYPE :LONG-LONG) ...)
; processing (DEFPARAMETER *POSSIBLE-FLOAT-TYPES* ...)
; processing (DEFPARAMETER *OTHER-BUILTIN-TYPES* ...)
; processing (DEFPARAMETER *BUILT-IN-INTEGER-TYPES* ...)
; processing (DEFPARAMETER *BUILT-IN-FLOAT-TYPES* ...)
; processing (DEFINE-COMPILER-MACRO INC-POINTER ...)
; processing (DEFINE-MODIFY-MACRO INCF-POINTER ...)
; processing (DEFUN MEM-REF ...)
; processing (DEFINE-COMPILER-MACRO MEM-REF ...)
; processing (DEFUN MEM-SET ...)
; processing (DEFINE-SETF-EXPANDER MEM-REF ...)
; processing (DEFINE-COMPILER-MACRO MEM-SET ...)
; processing (DEFUN MEM-AREF ...)
; processing (DEFINE-COMPILER-MACRO MEM-AREF ...)
; processing (DEFINE-SETF-EXPANDER MEM-AREF ...)
; processing (DEFMETHOD TRANSLATE-INTO-FOREIGN-MEMORY ...)
; processing (DEFMETHOD TRANSLATE-INTO-FOREIGN-MEMORY ...)
; processing (DEFUN MEM-APTR ...)
; processing (DEFINE-COMPILER-MACRO MEM-APTR ...)
; processing (DEFINE-FOREIGN-TYPE FOREIGN-ARRAY-TYPE ...)
; processing (DEFMETHOD AGGREGATEP ...)
; processing (DEFMETHOD PRINT-OBJECT ...)
; processing (DEFUN ARRAY-ELEMENT-SIZE ...)
; processing (DEFMETHOD FOREIGN-TYPE-SIZE ...)
; processing (DEFMETHOD FOREIGN-TYPE-ALIGNMENT ...)
; processing (DEFINE-PARSE-METHOD :ARRAY ...)
; processing (DEFUN INDEXES-TO-ROW-MAJOR-INDEX ...)
; processing (DEFUN ROW-MAJOR-INDEX-TO-INDEXES ...)
; processing (DEFUN FOREIGN-ALLOC ...)
; processing (DEFINE-COMPILER-MACRO FOREIGN-ALLOC ...)
; processing (DEFUN LISP-ARRAY-TO-FOREIGN ...)
; processing (DEFUN FOREIGN-ARRAY-TO-LISP ...)
; processing (DEFUN FOREIGN-ARRAY-ALLOC ...)
; processing (DEFUN FOREIGN-ARRAY-FREE ...)
; processing (DEFMACRO WITH-FOREIGN-ARRAY ...)
; processing (DEFUN FOREIGN-AREF ...)
; processing (DEFUN (SETF FOREIGN-AREF) ...)
; processing (DEFMETHOD TRANSLATE-TO-FOREIGN ...)
; processing (DEFMETHOD TRANSLATE-AGGREGATE-TO-FOREIGN ...)
; processing (DEFMETHOD TRANSLATE-FROM-FOREIGN ...)
; processing (DEFMETHOD FREE-TRANSLATED-OBJECT ...)
; processing (DEFGENERIC FOREIGN-STRUCT-SLOT-POINTER ...)
; processing (DEFGENERIC FOREIGN-STRUCT-SLOT-POINTER-FORM ...)
; processing (DEFGENERIC FOREIGN-STRUCT-SLOT-VALUE ...)
; processing (DEFGENERIC (SETF FOREIGN-STRUCT-SLOT-VALUE) ...)
; processing (DEFGENERIC FOREIGN-STRUCT-SLOT-VALUE-FORM ...)
; processing (DEFGENERIC FOREIGN-STRUCT-SLOT-SET-FORM ...)
; processing (DEFCLASS FOREIGN-STRUCT-SLOT ...)
; processing (DEFMETHOD FOREIGN-STRUCT-SLOT-POINTER ...)
; processing (DEFMETHOD FOREIGN-STRUCT-SLOT-POINTER-FORM ...)
; processing (DEFUN FOREIGN-SLOT-NAMES ...)
; processing (DEFCLASS SIMPLE-STRUCT-SLOT ...)
; processing (DEFMETHOD FOREIGN-STRUCT-SLOT-VALUE ...)
; processing (DEFMETHOD FOREIGN-STRUCT-SLOT-VALUE-FORM ...)
; processing (DEFMETHOD (SETF FOREIGN-STRUCT-SLOT-VALUE) ...)
; processing (DEFMETHOD FOREIGN-STRUCT-SLOT-SET-FORM ...)
; processing (DEFCLASS AGGREGATE-STRUCT-SLOT ...)
; processing (DEFMETHOD FOREIGN-STRUCT-SLOT-VALUE ...)
; processing (DEFMETHOD FOREIGN-STRUCT-SLOT-VALUE-FORM ...)
; processing (DEFMETHOD TRANSLATE-AGGREGATE-TO-FOREIGN ...)
; processing (DEFMETHOD (SETF FOREIGN-STRUCT-SLOT-VALUE) ...)
; processing (DEFMETHOD FOREIGN-STRUCT-SLOT-SET-FORM ...)
; processing (DEFUN MAKE-STRUCT-SLOT ...)
; processing (DEFUN PARSE-DEPRECATED-STRUCT-TYPE ...)
; processing (DEFUN GET-ALIGNMENT ...)
; processing (DEFUN ADJUST-FOR-ALIGNMENT ...)
; processing (DEFMACRO WITH-TENTATIVE-TYPE-DEFINITION ...)
; processing (DEFUN NOTICE-FOREIGN-STRUCT-DEFINITION ...)
; processing (DEFUN GENERATE-STRUCT-ACCESSORS ...)
; processing (DEFINE-PARSE-METHOD :STRUCT ...)
; processing (DEFVAR *DEFCSTRUCT-HOOK* ...)
; processing (DEFMACRO DEFCSTRUCT ...)
; processing (DEFUN GET-SLOT-INFO ...)
; processing (DEFUN FOREIGN-SLOT-POINTER ...)
; processing (DEFINE-COMPILER-MACRO FOREIGN-SLOT-POINTER ...)
; processing (DEFUN FOREIGN-SLOT-TYPE ...)
; processing (DEFUN FOREIGN-SLOT-OFFSET ...)
; processing (DEFUN FOREIGN-SLOT-COUNT ...)
; processing (DEFUN FOREIGN-SLOT-VALUE ...)
; processing (DEFINE-COMPILER-MACRO FOREIGN-SLOT-VALUE ...)
; processing (DEFINE-SETF-EXPANDER FOREIGN-SLOT-VALUE ...)
; processing (DEFUN FOREIGN-SLOT-SET ...)
; processing (DEFINE-COMPILER-MACRO FOREIGN-SLOT-SET ...)
; processing (DEFMACRO WITH-FOREIGN-SLOTS ...)
; processing (DEFMACRO DEFINE-C-STRUCT-WRAPPER ...)
; processing (DEFUN NOTICE-FOREIGN-UNION-DEFINITION ...)
; processing (DEFINE-PARSE-METHOD :UNION ...)
; processing (DEFMACRO DEFCUNION ...)
; processing (DEFMETHOD FOREIGN-TYPE-ALIGNMENT ...)
; processing (DEFMACRO WITH-FOREIGN-OBJECT ...)
; processing (DEFMACRO WITH-FOREIGN-OBJECTS ...)
; processing (DEFINE-FOREIGN-TYPE FOREIGN-TYPE-WRAPPER ...)
; processing (DEFINE-PARSE-METHOD :WRAPPER ...)
; processing (DEFMETHOD TRANSLATE-TO-FOREIGN ...)
; processing (DEFMETHOD TRANSLATE-FROM-FOREIGN ...)
; processing (DEFINE-FOREIGN-TYPE FOREIGN-BOOLEAN-TYPE ...)
; processing (DEFINE-PARSE-METHOD :BOOLEAN ...)
; processing (DEFMETHOD TRANSLATE-TO-FOREIGN ...)
; processing (DEFMETHOD TRANSLATE-FROM-FOREIGN ...)
; processing (DEFMETHOD EXPAND-TO-FOREIGN ...)
; processing (DEFMETHOD EXPAND-FROM-FOREIGN ...)
; processing (DEFCTYPE :BOOL ...)
; processing (DEFCTYPE :UCHAR ...)
; processing (DEFCTYPE :USHORT ...)
; processing (DEFCTYPE :UINT ...)
; processing (DEFCTYPE :ULONG ...)
; processing (DEFCTYPE :LLONG ...)
; processing (DEFCTYPE :ULLONG ...)
; processing (DEFMACRO DEFCTYPE-MATCHING ...)
; processing (MACROLET (#) ...)
; processing (DEFCTYPE :SIZE ...)
; processing (DEFCTYPE :SSIZE ...)
; processing (DEFCTYPE :PTRDIFF ...)
; processing (DEFCTYPE :OFFSET ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-cffi/src/types-tmpC6WXNUWP.fasl
; compilation finished in 0:00:01.796
; compiling file "/usr/share/common-lisp/source/cl-cffi/src/enum.lisp" (written 03 APR 2021 02:35:42 PM):
; processing (IN-PACKAGE #:CFFI)
; processing (DEFCLASS FOREIGN-ENUM ...)
; processing (DEFTYPE ENUM-KEY ...)
; processing (DEFPARAMETER +VALID-ENUM-BASE-TYPES+ ...)
; processing (DEFUN PARSE-FOREIGN-ENUM-LIKE ...)
; processing (DEFUN MAKE-FOREIGN-ENUM ...)
; processing (DEFUN %DEFCENUM-LIKE ...)
; processing (DEFMACRO DEFCENUM ...)
; processing (DEFUN HASH-KEYS-TO-LIST ...)
; processing (DEFUN FOREIGN-ENUM-KEYWORD-LIST ...)
; processing (DEFUN %FOREIGN-ENUM-VALUE ...)
; processing (DEFUN FOREIGN-ENUM-VALUE ...)
; processing (DEFUN %FOREIGN-ENUM-KEYWORD ...)
; processing (DEFUN FOREIGN-ENUM-KEYWORD ...)
; processing (DEFMETHOD TRANSLATE-TO-FOREIGN ...)
; processing (DEFMETHOD TRANSLATE-INTO-FOREIGN-MEMORY ...)
; processing (DEFMETHOD TRANSLATE-FROM-FOREIGN ...)
; processing (DEFMETHOD EXPAND-TO-FOREIGN ...)
; processing (DEFMETHOD EXPAND-TO-FOREIGN-DYN-INDIRECT ...)
; processing (DEFCLASS FOREIGN-BITFIELD ...)
; processing (DEFUN MAKE-FOREIGN-BITFIELD ...)
; processing (DEFMACRO DEFBITFIELD ...)
; processing (DEFUN FOREIGN-BITFIELD-SYMBOL-LIST ...)
; processing (DEFUN %FOREIGN-BITFIELD-VALUE ...)
; processing (DEFUN FOREIGN-BITFIELD-VALUE ...)
; processing (DEFINE-COMPILER-MACRO FOREIGN-BITFIELD-VALUE ...)
; processing (DEFUN %FOREIGN-BITFIELD-SYMBOLS ...)
; processing (DEFUN FOREIGN-BITFIELD-SYMBOLS ...)
; processing (DEFINE-COMPILER-MACRO FOREIGN-BITFIELD-SYMBOLS ...)
; processing (DEFMETHOD TRANSLATE-TO-FOREIGN ...)
; processing (DEFMETHOD TRANSLATE-FROM-FOREIGN ...)
; processing (DEFMETHOD EXPAND-TO-FOREIGN ...)
; processing (DEFMETHOD EXPAND-FROM-FOREIGN ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-cffi/src/enum-tmpB17HDEGA.fasl
; compilation finished in 0:00:00.476
; compiling file "/usr/share/common-lisp/source/cl-cffi/src/strings.lisp" (written 03 APR 2021 02:35:42 PM):
; processing (IN-PACKAGE #:CFFI)
; processing (DEFVAR *DEFAULT-FOREIGN-ENCODING* ...)
; processing (DEFMACRO BGET ...)
; processing (DEFMACRO BSET ...)
; processing (DEFPARAMETER *FOREIGN-STRING-MAPPINGS* ...)
; processing (DEFUN NULL-TERMINATOR-LEN ...)
; processing (DEFUN LISP-STRING-TO-FOREIGN ...)
; processing (DEFMACRO %FOREIGN-STRING-LENGTH ...)
; processing (DEFUN FOREIGN-STRING-LENGTH ...)
; processing (DEFUN FOREIGN-STRING-TO-LISP ...)
; processing (DEFUN FOREIGN-STRING-ALLOC ...)
; processing (DEFUN FOREIGN-STRING-FREE ...)
; processing (DEFMACRO WITH-FOREIGN-STRING ...)
; processing (DEFMACRO WITH-FOREIGN-STRINGS ...)
; processing (DEFMACRO WITH-FOREIGN-POINTER-AS-STRING ...)
; processing (DEFINE-FOREIGN-TYPE FOREIGN-STRING-TYPE ...)
; processing (DEFUN FST-ENCODING ...)
; processing (DEFMETHOD PRINT-OBJECT ...)
; processing (DEFMETHOD TRANSLATE-TO-FOREIGN ...)
; processing (DEFMETHOD TRANSLATE-TO-FOREIGN ...)
; processing (DEFMETHOD TRANSLATE-FROM-FOREIGN ...)
; processing (DEFMETHOD FREE-TRANSLATED-OBJECT ...)
; processing (DEFMETHOD EXPAND-TO-FOREIGN-DYN-INDIRECT ...)
; processing (DEFINE-FOREIGN-TYPE FOREIGN-STRING+PTR-TYPE ...)
; processing (DEFMETHOD TRANSLATE-FROM-FOREIGN ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-cffi/src/strings-tmpE3AQVWGT.fasl
; compilation finished in 0:00:08.496
; compiling file "/usr/share/common-lisp/source/cl-cffi/src/structures.lisp" (written 03 APR 2021 02:35:42 PM):
; processing (IN-PACKAGE #:CFFI)
; processing (DEFMETHOD TRANSLATE-INTO-FOREIGN-MEMORY ...)
; processing (DEFMETHOD TRANSLATE-TO-FOREIGN ...)
; processing (DEFMETHOD TRANSLATE-FROM-FOREIGN ...)
; processing (DEFMETHOD FREE-TRANSLATED-OBJECT ...)
; processing (DEFMACRO DEFINE-TRANSLATION-METHOD ...)
; processing (DEFMACRO TRANSLATION-FORMS-FOR-CLASS ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-cffi/src/structures-tmpYKOEPICF.fasl
; compilation finished in 0:00:00.164
; compiling file "/usr/share/common-lisp/source/cl-cffi/src/functions.lisp" (written 03 APR 2021 02:35:42 PM):
; processing (IN-PACKAGE #:CFFI)
; processing (DEFUN TRANSLATE-OBJECTS ...)
; processing (DEFUN PARSE-ARGS-AND-TYPES ...)
; processing (DEFUN PARSE-FUNCTION-OPTIONS ...)
; processing (DEFUN STRUCTURE-BY-VALUE-P ...)
; processing (DEFUN FN-CALL-BY-VALUE-P ...)
; processing (DEFVAR *FOREIGN-STRUCTURES-BY-VALUE* ...)
; processing (DEFUN FOREIGN-FUNCALL-FORM ...)
; processing (DEFMACRO FOREIGN-FUNCALL ...)
; processing (DEFMACRO FOREIGN-FUNCALL-POINTER ...)
; processing (DEFUN PROMOTE-VARARGS-TYPE ...)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...)
; processing (DEFUN FOREIGN-FUNCALL-VARARGS-FORM ...)
; processing (DEFMACRO FOREIGN-FUNCALL-VARARGS ...)
; processing (DEFMACRO FOREIGN-FUNCALL-POINTER-VARARGS ...)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...)
; processing (DEFUN %DEFCFUN ...)
; processing (DEFUN %DEFCFUN-VARARGS ...)
; processing (DEFGENERIC TRANSLATE-UNDERSCORE-SEPARATED-NAME ...)
; processing (DEFUN COLLAPSE-PREFIX ...)
; processing (DEFUN CHECK-PREFIX ...)
; processing (DEFGENERIC TRANSLATE-CAMELCASE-NAME ...)
; processing (DEFGENERIC TRANSLATE-NAME-FROM-FOREIGN ...)
; processing (DEFGENERIC TRANSLATE-NAME-TO-FOREIGN ...)
; processing (DEFUN LISP-NAME ...)
; processing (DEFUN FOREIGN-NAME ...)
; processing (DEFUN FOREIGN-OPTIONS ...)
; processing (DEFUN LISP-NAME-P ...)
; processing (DEFUN %PARSE-NAME-AND-OPTIONS ...)
; processing (DEFUN PARSE-NAME-AND-OPTIONS ...)
; processing (DEFMACRO DEFCFUN ...)
; processing (DEFUN INVERSE-TRANSLATE-OBJECTS ...)
; processing (DEFUN PARSE-DEFCALLBACK-OPTIONS ...)
; processing (DEFMACRO DEFCALLBACK ...)
; processing (DECLAIM (INLINE GET-CALLBACK))
; processing (DEFUN GET-CALLBACK ...)
; processing (DEFMACRO CALLBACK ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-cffi/src/functions-tmpQK8YY837.fasl
; compilation finished in 0:00:00.772
; compiling file "/usr/share/common-lisp/source/cl-cffi/src/foreign-vars.lisp" (written 03 APR 2021 02:35:42 PM):
; processing (IN-PACKAGE #:CFFI)
; processing (DEFUN PARSE-DEFCVAR-OPTIONS ...)
; processing (DEFUN GET-VAR-POINTER ...)
; processing (DEFUN FOREIGN-SYMBOL-POINTER ...)
; processing (DEFUN FS-POINTER-OR-LOSE ...)
; processing (DEFMACRO DEFCVAR ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-cffi/src/foreign-vars-tmpJQI6KMRZ.fasl
; compilation finished in 0:00:00.096
; compiling file "/usr/share/common-lisp/source/cl-cffi/src/features.lisp" (written 03 APR 2021 02:35:42 PM):
; processing (IN-PACKAGE #:CL-USER)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...)
; processing (DEFPACKAGE #:CFFI-FEATURES ...)
; processing (IN-PACKAGE #:CFFI-FEATURES)
; processing (DEFUN CFFI-FEATURE-P ...)
; processing (MAPC (LAMBDA # ...) ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-cffi/src/features-tmpWUHK9UI0.fasl
; compilation finished in 0:00:00.052
;
; compilation unit finished
; printed 2 notes
;; loading system "cl+ssl"
WARNING: System definition file #P"/usr/share/common-lisp/source/cl-flexi-streams/flexi-streams.asd" contains definition for system "flexi-streams-test". Please only define "flexi-streams" and secondary systems with a name starting with "flexi-streams/" (e.g. "flexi-streams/test") in that file.
; compiling file "/usr/share/common-lisp/source/cl-trivial-gray-streams/package.lisp" (written 17 JAN 2021 08:01:37 PM):
; processing (IN-PACKAGE :CL-USER)
; processing (MACROLET (#) ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-trivial-gray-streams/package-tmpUUOI3UDB.fasl
; compilation finished in 0:00:00.016
; compiling file "/usr/share/common-lisp/source/cl-trivial-gray-streams/streams.lisp" (written 17 JAN 2021 08:01:37 PM):
; processing (IN-PACKAGE :TRIVIAL-GRAY-STREAMS)
; processing (DEFCLASS FUNDAMENTAL-STREAM ...)
; processing (DEFCLASS FUNDAMENTAL-INPUT-STREAM ...)
; processing (DEFCLASS FUNDAMENTAL-OUTPUT-STREAM ...)
; processing (DEFCLASS FUNDAMENTAL-CHARACTER-STREAM ...)
; processing (DEFCLASS FUNDAMENTAL-BINARY-STREAM ...)
; processing (DEFCLASS FUNDAMENTAL-CHARACTER-INPUT-STREAM ...)
; processing (DEFCLASS FUNDAMENTAL-CHARACTER-OUTPUT-STREAM ...)
; processing (DEFCLASS FUNDAMENTAL-BINARY-INPUT-STREAM ...)
; processing (DEFCLASS FUNDAMENTAL-BINARY-OUTPUT-STREAM ...)
; processing (DEFGENERIC STREAM-READ-SEQUENCE ...)
; processing (DEFGENERIC STREAM-WRITE-SEQUENCE ...)
; processing (DEFGENERIC STREAM-FILE-POSITION ...)
; processing (DEFGENERIC (SETF STREAM-FILE-POSITION) ...)
; processing (DEFMETHOD STREAM-READ-SEQUENCE ...)
; processing (DEFMETHOD STREAM-WRITE-SEQUENCE ...)
; processing (DEFMACRO OR-FALLBACK ...)
; processing (DEFMETHOD STREAM-TERPRI ...)
; processing (DEFMETHOD STREAM-FILE-POSITION ...)
; processing (DEFMETHOD (SETF STREAM-FILE-POSITION) ...)
; processing (PROGN (DEFMETHOD SB-GRAY:STREAM-READ-SEQUENCE ...) ...)
; processing (DEFCLASS TRIVIAL-GRAY-STREAM-MIXIN ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-trivial-gray-streams/streams-tmpG1IOPEUW.fasl
; compilation finished in 0:00:00.204
; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/packages.lisp" (written 28 JUL 2021 07:07:50 PM):
; processing (IN-PACKAGE :CL-USER)
; processing (UNLESS (FIND-SYMBOL # ...) ...)
; processing (DEFPACKAGE :FLEXI-STREAMS ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/packages-tmpM0NOM18K.fasl
; compilation finished in 0:00:00.004
; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/mapping.lisp" (written 28 JUL 2021 07:07:50 PM):
; processing (IN-PACKAGE :FLEXI-STREAMS)
; processing (DEFTYPE OCTET ...)
; processing (DEFTYPE CHAR* ...)
; processing (DEFTYPE STRING* ...)
; processing (DEFTYPE CHAR-CODE-INTEGER ...)
; processing (DEFTYPE CODE-POINT ...)
; processing (DEFMACRO DEFCONSTANT ...)
; processing (DEFUN INVERT-TABLE ...)
; processing (DEFUN MAKE-DECODING-TABLE ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/mapping-tmpVIL8T0YR.fasl
; compilation finished in 0:00:00.048
; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/ascii.lisp" (written 28 JUL 2021 07:07:50 PM):
; processing (IN-PACKAGE :FLEXI-STREAMS)
; processing (DEFCONSTANT +ASCII-TABLE+ ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/ascii-tmpBODYQO2B.fasl
; compilation finished in 0:00:00.004
; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/koi8-r.lisp" (written 28 JUL 2021 07:07:50 PM):
; processing (IN-PACKAGE :FLEXI-STREAMS)
; processing (DEFCONSTANT +KOI8-R-TABLE+ ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/koi8-r-tmpTLIPDLNH.fasl
; compilation finished in 0:00:00.004
; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/mac.lisp" (written 28 JUL 2021 07:07:50 PM):
; processing (IN-PACKAGE :FLEXI-STREAMS)
; processing (DEFCONSTANT +MAC-ROMAN-TABLE+ ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/mac-tmpMOOD9PZK.fasl
; compilation finished in 0:00:00.004
; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/iso-8859.lisp" (written 28 JUL 2021 07:07:50 PM):
; processing (IN-PACKAGE :FLEXI-STREAMS)
; processing (DEFCONSTANT +ISO-8859-TABLES+ ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/iso-8859-tmpJSQEHKQD.fasl
; compilation finished in 0:00:00.028
; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/enc-cn-tbl.lisp" (written 28 JUL 2021 07:07:50 PM):
; processing (IN-PACKAGE :FLEXI-STREAMS)
; processing (DEFUN MAKE-MULTIBYTE-MAPPER ...)
; processing (DEFMACRO DEFINE-MULTIBYTE-MAPPER ...)
; processing (DEFINE-MULTIBYTE-MAPPER *GBK-TO-UCS-SPECIAL-TABLE* ...)
; processing (DEFINE-MULTIBYTE-MAPPER *UCS-TO-GBK-SPECIAL-TABLE* ...)
; processing (DEFINE-MULTIBYTE-MAPPER *GBK-TO-UCS-TABLE* ...)
; processing (DEFINE-MULTIBYTE-MAPPER *UCS-TO-GBK-TABLE* ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/enc-cn-tbl-tmpX9RFG54G.fasl
; compilation finished in 0:00:01.368
; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/code-pages.lisp" (written 28 JUL 2021 07:07:50 PM):
; processing (IN-PACKAGE :FLEXI-STREAMS)
; processing (DEFCONSTANT +CODE-PAGE-TABLES+ ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/code-pages-tmpJZYZV5YE.fasl
; compilation finished in 0:00:00.040
; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/specials.lisp" (written 28 JUL 2021 07:07:50 PM):
; processing (IN-PACKAGE :FLEXI-STREAMS)
; processing (DEFVAR *STANDARD-OPTIMIZE-SETTINGS* ...)
; processing (DEFVAR *FIXNUM-OPTIMIZE-SETTINGS* ...)
; processing (DEFCONSTANT +LF+ ...)
; processing (DEFCONSTANT +CR+ ...)
; processing (DEFVAR *CURRENT-UNREADER* ...)
; processing (DEFVAR +NAME-MAP+ ...)
; processing (DEFVAR +SHORTCUT-MAP+ ...)
; processing (DEFVAR *DEFAULT-EOL-STYLE* ...)
; processing (DEFVAR *DEFAULT-LITTLE-ENDIAN* ...)
; processing (DEFVAR *SUBSTITUTION-CHAR* ...)
; processing (DEFCONSTANT +ISO-8859-HASHES+ ...)
; processing (DEFCONSTANT +CODE-PAGE-HASHES+ ...)
; processing (DEFCONSTANT +ASCII-HASH+ ...)
; processing (DEFCONSTANT +KOI8-R-HASH+ ...)
; processing (DEFCONSTANT +MAC-ROMAN-HASH+ ...)
; processing (DEFCONSTANT +BUFFER-SIZE+ ...)
; processing (PUSHNEW :FLEXI-STREAMS ...)
; processing (DEFVAR *HYPERDOC-BASE-URI* ...)
; processing (LET (#) ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/specials-tmp7AGT8VJK.fasl
; compilation finished in 0:00:00.076
; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/util.lisp" (written 28 JUL 2021 07:07:50 PM):
; processing (IN-PACKAGE :FLEXI-STREAMS)
; processing (DEFMACRO WHEN-LET ...)
; processing (DEFMACRO WITH-UNIQUE-NAMES ...)
; processing (DEFMACRO WITH-REBINDING ...)
; processing (DEFUN NORMALIZE-EXTERNAL-FORMAT-NAME ...)
; processing (DEFUN ASCII-NAME-P ...)
; processing (DEFUN KOI8-R-NAME-P ...)
; processing (DEFUN MAC-ROMAN-NAME-P ...)
; processing (DEFUN CODE-PAGE-NAME-P ...)
; processing (DEFUN ISO-8859-NAME-P ...)
; processing (DEFUN KNOWN-CODE-PAGE-ID-P ...)
; processing (DEFUN SANS ...)
; processing (DEFUN MAKE-OCTET-BUFFER ...)
; processing (DEFUN TYPE-EQUAL ...)
; processing (DEFUN MAYBE-REWIND ...)
; processing (DEFMACRO LOGAND* ...)
; processing (DEFMACRO LOGIOR* ...)
; processing (DEFMACRO ASH* ...)
; processing (DEFUN GET-MULTIBYTE-MAPPER ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/util.lisp
; in: DEFUN GET-MULTIBYTE-MAPPER
; (AREF FLEXI-STREAMS::TABLE FLEXI-STREAMS::M 0)
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (ARRAY * (* 2)), not a SIMPLE-ARRAY.
; (AREF FLEXI-STREAMS::TABLE FLEXI-STREAMS::M 1)
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (ARRAY * (* 2)), not a SIMPLE-ARRAY.
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/util-tmpVX9R9U8P.fasl
; compilation finished in 0:00:00.232
; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/conditions.lisp" (written 28 JUL 2021 07:07:50 PM):
; processing (IN-PACKAGE :FLEXI-STREAMS)
; processing (DEFINE-CONDITION FLEXI-STREAM-ERROR ...)
; processing (DEFINE-CONDITION FLEXI-STREAM-SIMPLE-ERROR ...)
; processing (DEFINE-CONDITION FLEXI-STREAM-ELEMENT-TYPE-ERROR ...)
; processing (DEFINE-CONDITION FLEXI-STREAM-OUT-OF-SYNC-ERROR ...)
; processing (DEFINE-CONDITION IN-MEMORY-STREAM-ERROR ...)
; processing (DEFINE-CONDITION IN-MEMORY-STREAM-SIMPLE-ERROR ...)
; processing (DEFINE-CONDITION IN-MEMORY-STREAM-CLOSED-ERROR ...)
; processing (DEFINE-CONDITION IN-MEMORY-STREAM-POSITION-SPEC-ERROR ...)
; processing (DEFINE-CONDITION EXTERNAL-FORMAT-CONDITION ...)
; processing (DEFINE-CONDITION EXTERNAL-FORMAT-ERROR ...)
; processing (DEFINE-CONDITION EXTERNAL-FORMAT-ENCODING-ERROR ...)
; processing (DEFUN SIGNAL-ENCODING-ERROR ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/conditions-tmpQCDFKETQ.fasl
; compilation finished in 0:00:00.052
; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/external-format.lisp" (written 28 JUL 2021 07:07:50 PM):
; processing (IN-PACKAGE :FLEXI-STREAMS)
; processing (DEFCLASS EXTERNAL-FORMAT ...)
; processing (DEFMETHOD MAKE-LOAD-FORM ...)
; processing (DEFCLASS FLEXI-CR-MIXIN ...)
; processing (DEFCLASS FLEXI-CRLF-MIXIN ...)
; processing (DEFCLASS FLEXI-8-BIT-FORMAT ...)
; processing (DEFCLASS FLEXI-CR-8-BIT-FORMAT ...)
; processing (DEFCLASS FLEXI-CRLF-8-BIT-FORMAT ...)
; processing (DEFCLASS FLEXI-ASCII-FORMAT ...)
; processing (DEFCLASS FLEXI-CR-ASCII-FORMAT ...)
; processing (DEFCLASS FLEXI-CRLF-ASCII-FORMAT ...)
; processing (DEFCLASS FLEXI-LATIN-1-FORMAT ...)
; processing (DEFCLASS FLEXI-CR-LATIN-1-FORMAT ...)
; processing (DEFCLASS FLEXI-CRLF-LATIN-1-FORMAT ...)
; processing (DEFCLASS FLEXI-UTF-32-FORMAT ...)
; processing (DEFCLASS FLEXI-UTF-32-LE-FORMAT ...)
; processing (DEFCLASS FLEXI-CR-UTF-32-LE-FORMAT ...)
; processing (DEFCLASS FLEXI-CRLF-UTF-32-LE-FORMAT ...)
; processing (DEFCLASS FLEXI-UTF-32-BE-FORMAT ...)
; processing (DEFCLASS FLEXI-CR-UTF-32-BE-FORMAT ...)
; processing (DEFCLASS FLEXI-CRLF-UTF-32-BE-FORMAT ...)
; processing (DEFCLASS FLEXI-UTF-16-FORMAT ...)
; processing (DEFCLASS FLEXI-UTF-16-LE-FORMAT ...)
; processing (DEFCLASS FLEXI-CR-UTF-16-LE-FORMAT ...)
; processing (DEFCLASS FLEXI-CRLF-UTF-16-LE-FORMAT ...)
; processing (DEFCLASS FLEXI-UTF-16-BE-FORMAT ...)
; processing (DEFCLASS FLEXI-CR-UTF-16-BE-FORMAT ...)
; processing (DEFCLASS FLEXI-CRLF-UTF-16-BE-FORMAT ...)
; processing (DEFCLASS FLEXI-GBK-FORMAT ...)
; processing (DEFCLASS FLEXI-CR-GBK-FORMAT ...)
; processing (DEFCLASS FLEXI-CRLF-GBK-FORMAT ...)
; processing (DEFCLASS FLEXI-UTF-8-FORMAT ...)
; processing (DEFCLASS FLEXI-CR-UTF-8-FORMAT ...)
; processing (DEFCLASS FLEXI-CRLF-UTF-8-FORMAT ...)
; processing (DEFMETHOD INITIALIZE-INSTANCE ...)
; processing (DEFUN EXTERNAL-FORMAT-CLASS-NAME ...)
; processing (DEFUN MAKE-EXTERNAL-FORMAT% ...)
; processing (DEFUN MAKE-EXTERNAL-FORMAT ...)
; processing (DEFUN MAYBE-CONVERT-EXTERNAL-FORMAT ...)
; processing (DEFUN EXTERNAL-FORMAT-EQUAL ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/external-format.lisp
; in: DEFUN EXTERNAL-FORMAT-EQUAL
; (EQL (FLEXI-STREAMS:EXTERNAL-FORMAT-ID FLEXI-STREAMS::EF1)
; (FLEXI-STREAMS:EXTERNAL-FORMAT-ID FLEXI-STREAMS::EF2))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a T, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The second argument is a T, not a (UNSIGNED-BYTE 32).
; etc.
; processing (DEFUN NORMALIZE-EXTERNAL-FORMAT ...)
; processing (DEFMETHOD PRINT-OBJECT ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/external-format-tmpO1PDDUR.fasl
; compilation finished in 0:00:00.456
; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/length.lisp" (written 28 JUL 2021 07:07:50 PM):
; processing (IN-PACKAGE :FLEXI-STREAMS)
; processing (DEFGENERIC ENCODING-FACTOR ...)
; processing (DEFMETHOD ENCODING-FACTOR ...)
; processing (DEFMETHOD ENCODING-FACTOR ...)
; processing (DEFMETHOD ENCODING-FACTOR ...)
; processing (DEFMETHOD ENCODING-FACTOR ...)
; processing (DEFMETHOD ENCODING-FACTOR ...)
; processing (DEFMETHOD ENCODING-FACTOR ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp
; in: DEFMETHOD ENCODING-FACTOR (FLEXI-CRLF-MIXIN)
; (* 1.02d0 (CALL-NEXT-METHOD))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: forced to do full call
; unable to do inline float arithmetic (cost 5) because:
; The first argument is a T, not a DOUBLE-FLOAT.
; The result is a (VALUES (OR (COMPLEX DOUBLE-FLOAT) DOUBLE-FLOAT)
; &OPTIONAL), not a (VALUES DOUBLE-FLOAT &REST T).
; processing (DEFGENERIC CHECK-END ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp
; in: DEFGENERIC CHECK-END
; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT "This sequence can't be decoded ~
; using ~A as it is too short. ~A octet~:P missing at the end."
; (FLEXI-STREAMS:EXTERNAL-FORMAT-NAME
; FORMAT)
; (- FLEXI-STREAMS::I FLEXI-STREAMS::END))
;
; note: doing signed word to integer coercion (cost 20)
; processing (DEFGENERIC COMPUTE-NUMBER-OF-CHARS ...)
; processing (DEFMETHOD COMPUTE-NUMBER-OF-CHARS ...)
; processing (DEFMETHOD COMPUTE-NUMBER-OF-CHARS ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp
; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-8-BIT-FORMAT T T T)
; (DEFMETHOD FLEXI-STREAMS::COMPUTE-NUMBER-OF-CHARS
; ((FORMAT FLEXI-STREAMS::FLEXI-8-BIT-FORMAT) SEQUENCE
; FLEXI-STREAMS::START FLEXI-STREAMS::END)
; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0)))
; (DECLARE (FIXNUM FLEXI-STREAMS::START FLEXI-STREAMS::END))
; (DECLARE (IGNORE SEQUENCE))
; (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA (SB-PCL::FAST-METHOD
; FLEXI-STREAMS::COMPUTE-NUMBER-OF-CHARS
; (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT T T T))
; (SB-PCL::.PV. SB-PCL::.NEXT-METHOD-CALL. FORMAT SEQUENCE
; FLEXI-STREAMS::START FLEXI-STREAMS::END)
; (DECLARE (IGNORABLE SB-PCL::.PV. SB-PCL::.NEXT-METHOD-CALL.)
; (DISABLE-PACKAGE-LOCKS SB-PCL::PV-ENV-ENVIRONMENT))
; (DECLARE (IGNORE SEQUENCE))
; (DECLARE (FIXNUM FLEXI-STREAMS::END FLEXI-STREAMS::START))
; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0)))
; (DECLARE
; (SB-C::CURRENT-DEFMETHOD FLEXI-STREAMS::COMPUTE-NUMBER-OF-CHARS NIL
; (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT T T T)
; (FORMAT SEQUENCE FLEXI-STREAMS::START FLEXI-STREAMS::END)))
; (DECLARE
; (SB-C::SOURCE-FORM
; (LAMBDA (FORMAT SEQUENCE FLEXI-STREAMS::START FLEXI-STREAMS::END)
; (DECLARE #)
; (DECLARE #)
; (DECLARE #)
; (- FLEXI-STREAMS::END FLEXI-STREAMS::START))))
; (DECLARE (SB-PCL::%PARAMETER FLEXI-STREAMS::END))
; (DECLARE (SB-PCL::%PARAMETER FLEXI-STREAMS::START))
; (DECLARE (SB-PCL::%PARAMETER SEQUENCE))
; ...)
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFMETHOD COMPUTE-NUMBER-OF-CHARS ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp
; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-CRLF-MIXIN T T T)
; (SEARCH #(13 10) SEQUENCE :START2 FLEXI-STREAMS::I :END2 FLEXI-STREAMS::END
; :TEST #'=)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
;
; note: forced to do full call
; unable to do inline float comparison (cost 3) because:
; The first argument is a T, not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
; unable to do inline float comparison (cost 3) because:
; The first argument is a T, not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
; (- FLEXI-STREAMS::END FLEXI-STREAMS::START)
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 32) arithmetic
; processing (DEFMETHOD COMPUTE-NUMBER-OF-CHARS ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp
; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-UTF-8-FORMAT T T T)
; (AREF SEQUENCE FLEXI-STREAMS::I)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; processing (DEFMETHOD COMPUTE-NUMBER-OF-CHARS ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp
; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-CRLF-UTF-8-FORMAT T T T)
; (AREF SEQUENCE FLEXI-STREAMS::I)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; processing (DEFMETHOD COMPUTE-NUMBER-OF-CHARS ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp
; in:
; DEFMETHOD COMPUTE-NUMBER-OF-CHARS :BEFORE (FLEXI-UTF-16-FORMAT T T T)
; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT "~A octet~:P cannot be decoded ~
; using UTF-16 as ~:*~A is not even."
; (- FLEXI-STREAMS::END
; FLEXI-STREAMS::START))
;
; note: doing signed word to integer coercion (cost 20)
; processing (DEFMETHOD COMPUTE-NUMBER-OF-CHARS ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp
; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-UTF-16-LE-FORMAT T T T)
; (AREF SEQUENCE (1+ FLEXI-STREAMS::I))
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (INCF FLEXI-STREAMS::I LENGTH)
; --> THE MULTIPLE-VALUE-BIND LET UNLESS IF
; ==>
; (SB-INT:FIXNUMP #:G21)
;
; note: doing signed word to integer coercion (cost 20), for:
; the first argument of FIXNUMP
; processing (DEFMETHOD COMPUTE-NUMBER-OF-CHARS ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp
; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-UTF-16-BE-FORMAT T T T)
; (AREF SEQUENCE FLEXI-STREAMS::I)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; processing (DEFMETHOD COMPUTE-NUMBER-OF-CHARS ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp
; in:
; DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-CRLF-UTF-16-LE-FORMAT T T T)
; (AREF SEQUENCE (1+ FLEXI-STREAMS::I))
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (AREF SEQUENCE FLEXI-STREAMS::I)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (INCF FLEXI-STREAMS::I LENGTH)
; --> THE MULTIPLE-VALUE-BIND LET UNLESS IF
; ==>
; (SB-INT:FIXNUMP #:G25)
;
; note: doing signed word to integer coercion (cost 20), for:
; the first argument of FIXNUMP
; processing (DEFMETHOD COMPUTE-NUMBER-OF-CHARS ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp
; in:
; DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-CRLF-UTF-16-BE-FORMAT T T T)
; (AREF SEQUENCE FLEXI-STREAMS::I)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (AREF SEQUENCE (1+ FLEXI-STREAMS::I))
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; processing (DEFMETHOD COMPUTE-NUMBER-OF-CHARS ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp
; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-GBK-FORMAT T T T)
; (AREF SEQUENCE FLEXI-STREAMS::I)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; processing (DEFMETHOD COMPUTE-NUMBER-OF-CHARS ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp
; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-CRLF-GBK-FORMAT T T T)
; (AREF SEQUENCE FLEXI-STREAMS::I)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; processing (DEFMETHOD COMPUTE-NUMBER-OF-CHARS ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp
; in:
; DEFMETHOD COMPUTE-NUMBER-OF-CHARS :BEFORE (FLEXI-UTF-32-FORMAT T T T)
; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT "~A octet~:P cannot be decoded ~
; using UTF-32 as ~:*~A is not a multiple-value of four."
; LENGTH)
;
; note: doing signed word to integer coercion (cost 20)
; processing (DEFMETHOD COMPUTE-NUMBER-OF-CHARS ...)
; processing (DEFMETHOD COMPUTE-NUMBER-OF-CHARS ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp
; in:
; DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-CRLF-UTF-32-LE-FORMAT T T T)
; (AREF SEQUENCE FLEXI-STREAMS::J)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (= FLEXI-STREAMS:OCTET (AREF SEQUENCE FLEXI-STREAMS::J))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
;
; note: forced to do full call
; unable to do inline float comparison (cost 3) because:
; The first argument is a T, not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
; unable to do inline float comparison (cost 3) because:
; The first argument is a T, not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
; (DECF LENGTH)
; --> THE SB-IMPL::XSUBTRACT BLOCK
; ==>
; (- SB-IMPL::B SB-IMPL::A)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER * 268435456), not a FIXNUM.
; The result is a (VALUES (INTEGER * 268435455) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER * 268435456), not a FIXNUM.
; The result is a (VALUES (INTEGER * 268435455) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST T).
; etc.
; processing (DEFMETHOD COMPUTE-NUMBER-OF-CHARS ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp
; in:
; DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-CRLF-UTF-32-BE-FORMAT T T T)
; (AREF SEQUENCE FLEXI-STREAMS::J)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (= FLEXI-STREAMS:OCTET (AREF SEQUENCE FLEXI-STREAMS::J))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
;
; note: forced to do full call
; unable to do inline float comparison (cost 3) because:
; The first argument is a T, not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
; unable to do inline float comparison (cost 3) because:
; The first argument is a T, not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
; (DECF LENGTH)
; --> THE SB-IMPL::XSUBTRACT BLOCK
; ==>
; (- SB-IMPL::B SB-IMPL::A)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER * 268435456), not a FIXNUM.
; The result is a (VALUES (INTEGER * 268435455) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER * 268435456), not a FIXNUM.
; The result is a (VALUES (INTEGER * 268435455) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST T).
; etc.
; processing (DEFGENERIC COMPUTE-NUMBER-OF-OCTETS ...)
; processing (DEFMETHOD COMPUTE-NUMBER-OF-OCTETS ...)
; processing (DEFMETHOD COMPUTE-NUMBER-OF-OCTETS ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp
; in: DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-8-BIT-FORMAT T T T)
; (DEFMETHOD FLEXI-STREAMS::COMPUTE-NUMBER-OF-OCTETS
; ((FORMAT FLEXI-STREAMS::FLEXI-8-BIT-FORMAT) STRING
; FLEXI-STREAMS::START FLEXI-STREAMS::END)
; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0)))
; (DECLARE (FIXNUM FLEXI-STREAMS::START FLEXI-STREAMS::END))
; (DECLARE (IGNORE STRING))
; (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA (SB-PCL::FAST-METHOD
; FLEXI-STREAMS::COMPUTE-NUMBER-OF-OCTETS
; (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT T T T))
; (SB-PCL::.PV. SB-PCL::.NEXT-METHOD-CALL. FORMAT STRING
; FLEXI-STREAMS::START FLEXI-STREAMS::END)
; (DECLARE (IGNORABLE SB-PCL::.PV. SB-PCL::.NEXT-METHOD-CALL.)
; (DISABLE-PACKAGE-LOCKS SB-PCL::PV-ENV-ENVIRONMENT))
; (DECLARE (IGNORE STRING))
; (DECLARE (FIXNUM FLEXI-STREAMS::END FLEXI-STREAMS::START))
; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0)))
; (DECLARE
; (SB-C::CURRENT-DEFMETHOD FLEXI-STREAMS::COMPUTE-NUMBER-OF-OCTETS NIL
; (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT T T T)
; (FORMAT STRING FLEXI-STREAMS::START FLEXI-STREAMS::END)))
; (DECLARE
; (SB-C::SOURCE-FORM
; (LAMBDA (FORMAT STRING FLEXI-STREAMS::START FLEXI-STREAMS::END)
; (DECLARE #)
; (DECLARE #)
; (DECLARE #)
; (- FLEXI-STREAMS::END FLEXI-STREAMS::START))))
; (DECLARE (SB-PCL::%PARAMETER FLEXI-STREAMS::END))
; (DECLARE (SB-PCL::%PARAMETER FLEXI-STREAMS::START))
; (DECLARE (SB-PCL::%PARAMETER STRING))
; ...)
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFMETHOD COMPUTE-NUMBER-OF-OCTETS ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp
; in: DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-GBK-FORMAT T T T)
; (CHAR STRING FLEXI-STREAMS::I)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (INCF FLEXI-STREAMS::SUM FLEXI-STREAMS:CHAR-LENGTH)
; --> THE MULTIPLE-VALUE-BIND LET UNLESS IF
; ==>
; (SB-INT:FIXNUMP #:G22)
;
; note: doing signed word to integer coercion (cost 20), for:
; the first argument of FIXNUMP
; processing (DEFMETHOD COMPUTE-NUMBER-OF-OCTETS ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp
; in: DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-CRLF-GBK-FORMAT T T T)
; (CHAR STRING FLEXI-STREAMS::I)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (INCF FLEXI-STREAMS::SUM FLEXI-STREAMS:CHAR-LENGTH)
; --> THE MULTIPLE-VALUE-BIND LET UNLESS IF
; ==>
; (SB-INT:FIXNUMP #:G22)
;
; note: doing signed word to integer coercion (cost 20), for:
; the first argument of FIXNUMP
; processing (DEFMETHOD COMPUTE-NUMBER-OF-OCTETS ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp
; in: DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-UTF-8-FORMAT T T T)
; (CHAR STRING FLEXI-STREAMS::I)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (INCF FLEXI-STREAMS::SUM FLEXI-STREAMS:CHAR-LENGTH)
; --> THE MULTIPLE-VALUE-BIND LET UNLESS IF
; ==>
; (SB-INT:FIXNUMP #:G20)
;
; note: doing signed word to integer coercion (cost 20), for:
; the first argument of FIXNUMP
; processing (DEFMETHOD COMPUTE-NUMBER-OF-OCTETS ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp
; in: DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-CRLF-UTF-8-FORMAT T T T)
; (CHAR STRING FLEXI-STREAMS::I)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (INCF FLEXI-STREAMS::SUM FLEXI-STREAMS:CHAR-LENGTH)
; --> THE MULTIPLE-VALUE-BIND LET UNLESS IF
; ==>
; (SB-INT:FIXNUMP #:G20)
;
; note: doing signed word to integer coercion (cost 20), for:
; the first argument of FIXNUMP
; processing (DEFMETHOD COMPUTE-NUMBER-OF-OCTETS ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp
; in: DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-UTF-16-FORMAT T T T)
; (CHAR STRING FLEXI-STREAMS::I)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (INCF FLEXI-STREAMS::SUM FLEXI-STREAMS:CHAR-LENGTH)
; --> THE MULTIPLE-VALUE-BIND LET UNLESS IF
; ==>
; (SB-INT:FIXNUMP #:G20)
;
; note: doing signed word to integer coercion (cost 20), for:
; the first argument of FIXNUMP
; processing (DEFMETHOD COMPUTE-NUMBER-OF-OCTETS ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp
; in:
; DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-CRLF-UTF-16-LE-FORMAT T T T)
; (CHAR STRING FLEXI-STREAMS::I)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (INCF FLEXI-STREAMS::SUM FLEXI-STREAMS:CHAR-LENGTH)
; --> THE MULTIPLE-VALUE-BIND LET UNLESS IF
; ==>
; (SB-INT:FIXNUMP #:G20)
;
; note: doing signed word to integer coercion (cost 20), for:
; the first argument of FIXNUMP
; processing (DEFMETHOD COMPUTE-NUMBER-OF-OCTETS ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp
; in:
; DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-CRLF-UTF-16-BE-FORMAT T T T)
; (CHAR STRING FLEXI-STREAMS::I)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (INCF FLEXI-STREAMS::SUM FLEXI-STREAMS:CHAR-LENGTH)
; --> THE MULTIPLE-VALUE-BIND LET UNLESS IF
; ==>
; (SB-INT:FIXNUMP #:G20)
;
; note: doing signed word to integer coercion (cost 20), for:
; the first argument of FIXNUMP
; processing (DEFMETHOD COMPUTE-NUMBER-OF-OCTETS ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp
; in: DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-UTF-32-FORMAT T T T)
; (* 4 (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
; The result is a (VALUES (INTEGER -4294967292 4294967292) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline ASH (cost 2) because:
; The first argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
; The result is a (VALUES (INTEGER -4294967292 4294967292) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
;
; note: doing signed word to integer coercion (cost 20)
; processing (DEFMETHOD COMPUTE-NUMBER-OF-OCTETS ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp
; in: DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-CRLF-MIXIN T T T)
; (+ (CALL-NEXT-METHOD)
; (*
; (CASE (FLEXI-STREAMS:EXTERNAL-FORMAT-NAME FORMAT)
; (:UTF-32 4)
; (OTHERWISE 1))
; (COUNT #\Newline STRING :START FLEXI-STREAMS::START :END
; FLEXI-STREAMS::END :TEST #'CHAR=)))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a (MOD 2147483633), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: doing signed word to integer coercion (cost 20)
; processing (DEFGENERIC CHARACTER-LENGTH ...)
; processing (DEFMETHOD CHARACTER-LENGTH ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp
; in:
; DEFMETHOD CHARACTER-LENGTH :AROUND (FLEXI-CRLF-MIXIN (EQL #\Newline))
; (+ (CALL-NEXT-METHOD FORMAT FLEXI-STREAMS::+CR+)
; (CALL-NEXT-METHOD FORMAT FLEXI-STREAMS::+LF+))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a T, not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &REST T).
; etc.
; processing (DEFMETHOD CHARACTER-LENGTH ...)
; processing (DEFMETHOD CHARACTER-LENGTH ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/length-tmpIX4U16ZB.fasl
; compilation finished in 0:00:01.108
; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/encode.lisp" (written 28 JUL 2021 07:07:50 PM):
; processing (IN-PACKAGE :FLEXI-STREAMS)
; processing (DEFGENERIC CHAR-TO-OCTETS ...)
; processing (DEFGENERIC WRITE-SEQUENCE* ...)
; processing (DEFGENERIC STRING-TO-OCTETS* ...)
; processing (DEFMETHOD STRING-TO-OCTETS* ...)
; processing (DEFMACRO DEFINE-SEQUENCE-WRITERS ...)
; processing (DEFMACRO DEFINE-CHAR-ENCODERS ...)
; processing (DEFINE-CHAR-ENCODERS (FLEXI-LATIN-1-FORMAT FLEXI-CR-LATIN-1-FORMAT ...) ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/encode.lisp
; in:
; DEFINE-CHAR-ENCODERS (FLEXI-LATIN-1-FORMAT FLEXI-CR-LATIN-1-FORMAT
; FLEXI-CRLF-LATIN-1-FORMAT)
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
; "~S (code ~A) is not a LATIN-1 character."
; FLEXI-STREAMS::CHAR-GETTER
; FLEXI-STREAMS:OCTET)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-LATIN-1-FORMAT
; FLEXI-STREAMS::FLEXI-CR-LATIN-1-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-LATIN-1-FORMAT)
; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
; (WHEN (> FLEXI-STREAMS:OCTET 255)
; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
; "~S (code ~A) is not a LATIN-1 character."
; FLEXI-STREAMS::CHAR-GETTER
; FLEXI-STREAMS:OCTET))
; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
; "~S (code ~A) is not a LATIN-1 character."
; FLEXI-STREAMS::CHAR-GETTER
; FLEXI-STREAMS:OCTET)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
; "~S (code ~A) is not a LATIN-1 character."
; FLEXI-STREAMS::CHAR-GETTER
; FLEXI-STREAMS:OCTET)
; --> AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-LATIN-1-FORMAT
; FLEXI-STREAMS::FLEXI-CR-LATIN-1-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-LATIN-1-FORMAT)
; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
; (WHEN (> FLEXI-STREAMS:OCTET 255)
; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
; "~S (code ~A) is not a LATIN-1 character."
; FLEXI-STREAMS::CHAR-GETTER
; FLEXI-STREAMS:OCTET))
; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET
; ==>
; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END
; FLEXI-STREAMS::END :FROM-END T)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a T, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20)
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
; --> SYMBOL-MACROLET PROGN LOCALLY LET CHAR-CODE LET
; --> FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
; --> SYMBOL-MACROLET PROGN LOCALLY LET WHEN IF
; --> FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY LET CHAR-CODE LET FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY LET WHEN IF FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET
; --> FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY LET CHAR-CODE LET FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY LET WHEN IF FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET
; --> FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET
; ==>
; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END
; FLEXI-STREAMS::END :FROM-END T)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a T, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20)
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET
; ==>
; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END
; FLEXI-STREAMS::END :FROM-END T)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a T, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20)
; processing (DEFINE-CHAR-ENCODERS (FLEXI-ASCII-FORMAT FLEXI-CR-ASCII-FORMAT ...) ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/encode.lisp
; in:
; DEFINE-CHAR-ENCODERS (FLEXI-ASCII-FORMAT FLEXI-CR-ASCII-FORMAT
; FLEXI-CRLF-ASCII-FORMAT)
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
; "~S (code ~A) is not an ASCII character."
; FLEXI-STREAMS::CHAR-GETTER
; FLEXI-STREAMS:OCTET)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-ASCII-FORMAT
; FLEXI-STREAMS::FLEXI-CR-ASCII-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-ASCII-FORMAT)
; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
; (WHEN (> FLEXI-STREAMS:OCTET 127)
; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
; "~S (code ~A) is not an ASCII character."
; FLEXI-STREAMS::CHAR-GETTER
; FLEXI-STREAMS:OCTET))
; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
; "~S (code ~A) is not an ASCII character."
; FLEXI-STREAMS::CHAR-GETTER
; FLEXI-STREAMS:OCTET)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
; "~S (code ~A) is not an ASCII character."
; FLEXI-STREAMS::CHAR-GETTER
; FLEXI-STREAMS:OCTET)
; --> AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-ASCII-FORMAT
; FLEXI-STREAMS::FLEXI-CR-ASCII-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-ASCII-FORMAT)
; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
; (WHEN (> FLEXI-STREAMS:OCTET 127)
; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
; "~S (code ~A) is not an ASCII character."
; FLEXI-STREAMS::CHAR-GETTER
; FLEXI-STREAMS:OCTET))
; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET
; ==>
; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END
; FLEXI-STREAMS::END :FROM-END T)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a T, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20)
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
; --> SYMBOL-MACROLET PROGN LOCALLY LET CHAR-CODE LET
; --> FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
; --> SYMBOL-MACROLET PROGN LOCALLY LET WHEN IF
; --> FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY LET CHAR-CODE LET FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY LET WHEN IF FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET
; --> FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY LET CHAR-CODE LET FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY LET WHEN IF FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET
; --> FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET
; ==>
; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END
; FLEXI-STREAMS::END :FROM-END T)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a T, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20)
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET
; ==>
; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END
; FLEXI-STREAMS::END :FROM-END T)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a T, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20)
; processing (DEFINE-CHAR-ENCODERS (FLEXI-8-BIT-FORMAT FLEXI-CR-8-BIT-FORMAT ...) ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/encode.lisp
; in:
; DEFINE-CHAR-ENCODERS (FLEXI-8-BIT-FORMAT FLEXI-CR-8-BIT-FORMAT
; FLEXI-CRLF-8-BIT-FORMAT)
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
; "~S (code ~A) is not in this encoding."
; FLEXI-STREAMS::CHAR-GETTER
; FLEXI-STREAMS:OCTET)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT
; FLEXI-STREAMS::FLEXI-CR-8-BIT-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-8-BIT-FORMAT)
; (WITH-ACCESSORS ((FLEXI-STREAMS::ENCODING-HASH
; FLEXI-STREAMS::EXTERNAL-FORMAT-ENCODING-HASH))
; FORMAT
; (LET ((FLEXI-STREAMS:OCTET #))
; (UNLESS FLEXI-STREAMS:OCTET
; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
; "~S (code ~A) is not in this encoding."
; FLEXI-STREAMS::CHAR-GETTER
; FLEXI-STREAMS:OCTET))
; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
; "~S (code ~A) is not in this encoding."
; FLEXI-STREAMS::CHAR-GETTER
; FLEXI-STREAMS:OCTET)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
; "~S (code ~A) is not in this encoding."
; FLEXI-STREAMS::CHAR-GETTER
; FLEXI-STREAMS:OCTET)
; --> AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT
; FLEXI-STREAMS::FLEXI-CR-8-BIT-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-8-BIT-FORMAT)
; (WITH-ACCESSORS ((FLEXI-STREAMS::ENCODING-HASH
; FLEXI-STREAMS::EXTERNAL-FORMAT-ENCODING-HASH))
; FORMAT
; (LET ((FLEXI-STREAMS:OCTET #))
; (UNLESS FLEXI-STREAMS:OCTET
; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
; "~S (code ~A) is not in this encoding."
; FLEXI-STREAMS::CHAR-GETTER
; FLEXI-STREAMS:OCTET))
; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET
; ==>
; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END
; FLEXI-STREAMS::END :FROM-END T)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a T, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20)
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
; --> SYMBOL-MACROLET PROGN LOCALLY WITH-ACCESSORS LET SYMBOL-MACROLET LET
; --> GETHASH
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
; --> SYMBOL-MACROLET PROGN LOCALLY WITH-ACCESSORS LET SYMBOL-MACROLET LET
; --> UNLESS IF FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET
; --> FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY WITH-ACCESSORS LET SYMBOL-MACROLET LET GETHASH
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY WITH-ACCESSORS LET SYMBOL-MACROLET LET UNLESS IF
; --> FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY WITH-ACCESSORS LET SYMBOL-MACROLET LET GETHASH
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY WITH-ACCESSORS LET SYMBOL-MACROLET LET UNLESS IF
; --> FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET
; ==>
; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END
; FLEXI-STREAMS::END :FROM-END T)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a T, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20)
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET
; ==>
; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END
; FLEXI-STREAMS::END :FROM-END T)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a T, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20)
; processing (DEFINE-CHAR-ENCODERS (FLEXI-UTF-8-FORMAT FLEXI-CR-UTF-8-FORMAT ...) ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/encode.lisp
; in:
; DEFINE-CHAR-ENCODERS (FLEXI-UTF-8-FORMAT FLEXI-CR-UTF-8-FORMAT
; FLEXI-CRLF-UTF-8-FORMAT)
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-UTF-8-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-8-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-8-FORMAT)
; (LET ((CHAR-CODE (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
; (TAGBODY
; (COND (# # #) (# # #) (# # #) (T #))
; (FLEXI-STREAMS::OCTET-WRITER (FLEXI-STREAMS::LOGIOR* 128 #))
; FLEXI-STREAMS::TWO
; (FLEXI-STREAMS::OCTET-WRITER (FLEXI-STREAMS::LOGIOR* 128 #))
; FLEXI-STREAMS::ONE
; (FLEXI-STREAMS::OCTET-WRITER (FLEXI-STREAMS::LOGIOR* 128 #))
; FLEXI-STREAMS::ZERO)))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-UTF-8-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-8-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-8-FORMAT)
; (LET ((CHAR-CODE (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
; (TAGBODY
; (COND (# # #) (# # #) (# # #) (T #))
; (FLEXI-STREAMS::OCTET-WRITER (FLEXI-STREAMS::LOGIOR* 128 #))
; FLEXI-STREAMS::TWO
; (FLEXI-STREAMS::OCTET-WRITER (FLEXI-STREAMS::LOGIOR* 128 #))
; FLEXI-STREAMS::ONE
; (FLEXI-STREAMS::OCTET-WRITER (FLEXI-STREAMS::LOGIOR* 128 #))
; FLEXI-STREAMS::ZERO)))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET
; ==>
; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END
; FLEXI-STREAMS::END :FROM-END T)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a T, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20)
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
; --> SYMBOL-MACROLET PROGN LOCALLY LET CHAR-CODE LET
; --> FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY LET CHAR-CODE LET FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY LET CHAR-CODE LET FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET
; ==>
; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END
; FLEXI-STREAMS::END :FROM-END T)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a T, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20)
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET
; ==>
; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END
; FLEXI-STREAMS::END :FROM-END T)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a T, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20)
; processing (DEFINE-CHAR-ENCODERS (FLEXI-UTF-16-LE-FORMAT FLEXI-CR-UTF-16-LE-FORMAT ...) ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/encode.lisp
; in:
; DEFINE-CHAR-ENCODERS (FLEXI-UTF-16-LE-FORMAT FLEXI-CR-UTF-16-LE-FORMAT
; FLEXI-CRLF-UTF-16-LE-FORMAT)
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-UTF-16-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-16-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-16-LE-FORMAT)
; (FLET ((FLEXI-STREAMS::WRITE-WORD (FLEXI-STREAMS::WORD)
; (FLEXI-STREAMS::OCTET-WRITER #)
; (FLEXI-STREAMS::OCTET-WRITER #)))
; (DECLARE (INLINE FLEXI-STREAMS::WRITE-WORD))
; (LET ((CHAR-CODE #))
; (DECLARE (TYPE FLEXI-STREAMS::CHAR-CODE-INTEGER CHAR-CODE))
; (COND (# #) (T # # #)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-UTF-16-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-16-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-16-LE-FORMAT)
; (FLET ((FLEXI-STREAMS::WRITE-WORD (FLEXI-STREAMS::WORD)
; (FLEXI-STREAMS::OCTET-WRITER #)
; (FLEXI-STREAMS::OCTET-WRITER #)))
; (DECLARE (INLINE FLEXI-STREAMS::WRITE-WORD))
; (LET ((CHAR-CODE #))
; (DECLARE (TYPE FLEXI-STREAMS::CHAR-CODE-INTEGER CHAR-CODE))
; (COND (# #) (T # # #)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET
; ==>
; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END
; FLEXI-STREAMS::END :FROM-END T)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a T, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20)
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET CHAR-CODE LET
; --> FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY FLET LET CHAR-CODE LET FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY FLET LET CHAR-CODE LET FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET
; ==>
; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END
; FLEXI-STREAMS::END :FROM-END T)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a T, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20)
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET
; ==>
; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END
; FLEXI-STREAMS::END :FROM-END T)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a T, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20)
; processing (DEFINE-CHAR-ENCODERS (FLEXI-UTF-16-BE-FORMAT FLEXI-CR-UTF-16-BE-FORMAT ...) ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/encode.lisp
; in:
; DEFINE-CHAR-ENCODERS (FLEXI-UTF-16-BE-FORMAT FLEXI-CR-UTF-16-BE-FORMAT
; FLEXI-CRLF-UTF-16-BE-FORMAT)
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-UTF-16-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-16-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-16-BE-FORMAT)
; (FLET ((FLEXI-STREAMS::WRITE-WORD (FLEXI-STREAMS::WORD)
; (FLEXI-STREAMS::OCTET-WRITER #)
; (FLEXI-STREAMS::OCTET-WRITER #)))
; (DECLARE (INLINE FLEXI-STREAMS::WRITE-WORD))
; (LET ((CHAR-CODE #))
; (DECLARE (TYPE FLEXI-STREAMS::CHAR-CODE-INTEGER CHAR-CODE))
; (COND (# #) (T # # #)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-UTF-16-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-16-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-16-BE-FORMAT)
; (FLET ((FLEXI-STREAMS::WRITE-WORD (FLEXI-STREAMS::WORD)
; (FLEXI-STREAMS::OCTET-WRITER #)
; (FLEXI-STREAMS::OCTET-WRITER #)))
; (DECLARE (INLINE FLEXI-STREAMS::WRITE-WORD))
; (LET ((CHAR-CODE #))
; (DECLARE (TYPE FLEXI-STREAMS::CHAR-CODE-INTEGER CHAR-CODE))
; (COND (# #) (T # # #)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET
; ==>
; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END
; FLEXI-STREAMS::END :FROM-END T)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a T, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20)
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET CHAR-CODE LET
; --> FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY FLET LET CHAR-CODE LET FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY FLET LET CHAR-CODE LET FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET
; ==>
; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END
; FLEXI-STREAMS::END :FROM-END T)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a T, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20)
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET
; ==>
; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END
; FLEXI-STREAMS::END :FROM-END T)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a T, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20)
; processing (DEFINE-CHAR-ENCODERS (FLEXI-GBK-FORMAT FLEXI-CR-GBK-FORMAT ...) ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/encode.lisp
; in:
; DEFINE-CHAR-ENCODERS (FLEXI-GBK-FORMAT FLEXI-CR-GBK-FORMAT
; FLEXI-CRLF-GBK-FORMAT)
; (FLEXI-STREAMS::LOGAND* 65280 FLEXI-STREAMS::WORD)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::LOGAND* 255 FLEXI-STREAMS::WORD)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
; "~S (code ~A) is not in this encoding."
; FLEXI-STREAMS::CHAR-GETTER
; FLEXI-STREAMS:OCTET)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::LOGAND* 65280 FLEXI-STREAMS::WORD)
; ==>
; (LOGAND 65280 FLEXI-STREAMS::WORD)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::LOGAND* 255 FLEXI-STREAMS::WORD)
; ==>
; (LOGAND 255 FLEXI-STREAMS::WORD)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
; (IF (<= FLEXI-STREAMS:OCTET 127)
; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)
; (FLET (#)
; (DECLARE #)
; (DECLARE #)
; (COND # # #)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
; "~S (code ~A) is not in this encoding."
; FLEXI-STREAMS::CHAR-GETTER
; FLEXI-STREAMS:OCTET)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
; "~S (code ~A) is not in this encoding."
; FLEXI-STREAMS::CHAR-GETTER
; FLEXI-STREAMS:OCTET)
; --> AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
; (IF (<= FLEXI-STREAMS:OCTET 127)
; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)
; (FLET (#)
; (DECLARE #)
; (DECLARE #)
; (COND # # #)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET
; ==>
; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END
; FLEXI-STREAMS::END :FROM-END T)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a T, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::LOGAND* 65280 FLEXI-STREAMS::WORD)
; ==>
; (LOGAND 65280 FLEXI-STREAMS::WORD)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::LOGAND* 255 FLEXI-STREAMS::WORD)
; ==>
; (LOGAND 255 FLEXI-STREAMS::WORD)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::LOGAND* 65280 FLEXI-STREAMS::WORD)
; ==>
; (LOGAND 65280 FLEXI-STREAMS::WORD)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::LOGAND* 255 FLEXI-STREAMS::WORD)
; ==>
; (LOGAND 255 FLEXI-STREAMS::WORD)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
; (IF (<= FLEXI-STREAMS:OCTET 127)
; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)
; (FLET (#)
; (DECLARE #)
; (DECLARE #)
; (COND # # #)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (FLEXI-STREAMS::LOGAND* 65280 FLEXI-STREAMS::WORD)
; ==>
; (LOGAND 65280 FLEXI-STREAMS::WORD)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::LOGAND* 255 FLEXI-STREAMS::WORD)
; ==>
; (LOGAND 255 FLEXI-STREAMS::WORD)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
; (IF (<= FLEXI-STREAMS:OCTET 127)
; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)
; (FLET (#)
; (DECLARE #)
; (DECLARE #)
; (COND # # #)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20)
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
; --> SYMBOL-MACROLET PROGN LOCALLY LET CHAR-CODE LET
; --> FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
; --> SYMBOL-MACROLET PROGN LOCALLY LET IF FLET COND IF IF THE LET IF
; --> FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::LOGAND* 65280 FLEXI-STREAMS::WORD)
; ==>
; (LOGAND 65280 FLEXI-STREAMS::WORD)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::LOGAND* 255 FLEXI-STREAMS::WORD)
; ==>
; (LOGAND 255 FLEXI-STREAMS::WORD)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
; (IF (<= FLEXI-STREAMS:OCTET 127)
; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)
; (FLET (#)
; (DECLARE #)
; (DECLARE #)
; (COND # # #)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY LET CHAR-CODE LET FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY LET IF FLET COND IF IF THE LET IF
; --> FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY LET CHAR-CODE LET FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY LET IF FLET COND IF IF THE LET IF
; --> FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET
; ==>
; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END
; FLEXI-STREAMS::END :FROM-END T)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a T, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::LOGAND* 65280 FLEXI-STREAMS::WORD)
; ==>
; (LOGAND 65280 FLEXI-STREAMS::WORD)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::LOGAND* 255 FLEXI-STREAMS::WORD)
; ==>
; (LOGAND 255 FLEXI-STREAMS::WORD)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::LOGAND* 65280 FLEXI-STREAMS::WORD)
; ==>
; (LOGAND 65280 FLEXI-STREAMS::WORD)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::LOGAND* 255 FLEXI-STREAMS::WORD)
; ==>
; (LOGAND 255 FLEXI-STREAMS::WORD)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
; (IF (<= FLEXI-STREAMS:OCTET 127)
; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)
; (FLET (#)
; (DECLARE #)
; (DECLARE #)
; (COND # # #)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (FLEXI-STREAMS::LOGAND* 65280 FLEXI-STREAMS::WORD)
; ==>
; (LOGAND 65280 FLEXI-STREAMS::WORD)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::LOGAND* 255 FLEXI-STREAMS::WORD)
; ==>
; (LOGAND 255 FLEXI-STREAMS::WORD)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
; (IF (<= FLEXI-STREAMS:OCTET 127)
; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)
; (FLET (#)
; (DECLARE #)
; (DECLARE #)
; (COND # # #)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20)
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::LOGAND* 65280 FLEXI-STREAMS::WORD)
; ==>
; (LOGAND 65280 FLEXI-STREAMS::WORD)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::LOGAND* 255 FLEXI-STREAMS::WORD)
; ==>
; (LOGAND 255 FLEXI-STREAMS::WORD)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
; (IF (<= FLEXI-STREAMS:OCTET 127)
; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)
; (FLET (#)
; (DECLARE #)
; (DECLARE #)
; (COND # # #)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
; --> SYMBOL-MACROLET PROGN LOCALLY FLET
; ==>
; (#:WRITE-CHAR2 (#:CHAR1)
; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE #:CHAR1)))
; (IF (<= FLEXI-STREAMS:OCTET 127)
; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)
; (FLET (#)
; (DECLARE #)
; (DECLARE #)
; (COND # # #)))))
;
; note: Return type not fixed values, so can't use known return convention:
; *
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET
; ==>
; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END
; FLEXI-STREAMS::END :FROM-END T)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a T, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (FLEXI-STREAMS::LOGAND* 65280 FLEXI-STREAMS::WORD)
; ==>
; (LOGAND 65280 FLEXI-STREAMS::WORD)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::LOGAND* 255 FLEXI-STREAMS::WORD)
; ==>
; (LOGAND 255 FLEXI-STREAMS::WORD)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::LOGAND* 65280 FLEXI-STREAMS::WORD)
; ==>
; (LOGAND 65280 FLEXI-STREAMS::WORD)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::LOGAND* 255 FLEXI-STREAMS::WORD)
; ==>
; (LOGAND 255 FLEXI-STREAMS::WORD)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::LOGAND* 65280 FLEXI-STREAMS::WORD)
; ==>
; (LOGAND 65280 FLEXI-STREAMS::WORD)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::LOGAND* 255 FLEXI-STREAMS::WORD)
; ==>
; (LOGAND 255 FLEXI-STREAMS::WORD)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
; (IF (<= FLEXI-STREAMS:OCTET 127)
; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)
; (FLET (#)
; (DECLARE #)
; (DECLARE #)
; (COND # # #)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OBJECT BLOCK ETYPECASE LET COND IF
; --> IF PROGN SYMBOL-MACROLET LOCALLY FLET
; ==>
; (#:WRITE-CHAR2 (#:CHAR1)
; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE #:CHAR1)))
; (IF (<= FLEXI-STREAMS:OCTET 127)
; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)
; (FLET (#)
; (DECLARE #)
; (DECLARE #)
; (COND # # #)))))
;
; note: Return type not fixed values, so can't use known return convention:
; *
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20)
; processing (DEFINE-CHAR-ENCODERS (FLEXI-UTF-32-LE-FORMAT FLEXI-CR-UTF-32-LE-FORMAT ...) ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/encode.lisp
; in:
; DEFINE-CHAR-ENCODERS (FLEXI-UTF-32-LE-FORMAT FLEXI-CR-UTF-32-LE-FORMAT
; FLEXI-CRLF-UTF-32-LE-FORMAT)
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT)
; (LET ((CHAR-CODE (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
; (FLEXI-STREAMS::OCTET-WRITER (FLEXI-STREAMS::LOGAND* 255 CHAR-CODE))
; (FLEXI-STREAMS::OCTET-WRITER
; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -8)))
; (FLEXI-STREAMS::OCTET-WRITER
; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -16)))
; (FLEXI-STREAMS::OCTET-WRITER
; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -24)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT)
; (LET ((CHAR-CODE (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
; (FLEXI-STREAMS::OCTET-WRITER (FLEXI-STREAMS::LOGAND* 255 CHAR-CODE))
; (FLEXI-STREAMS::OCTET-WRITER
; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -8)))
; (FLEXI-STREAMS::OCTET-WRITER
; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -16)))
; (FLEXI-STREAMS::OCTET-WRITER
; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -24)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET
; ==>
; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END
; FLEXI-STREAMS::END :FROM-END T)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a T, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20)
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
; --> SYMBOL-MACROLET PROGN LOCALLY LET CHAR-CODE LET
; --> FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY LET CHAR-CODE LET FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY LET CHAR-CODE LET FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET
; ==>
; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END
; FLEXI-STREAMS::END :FROM-END T)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a T, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20)
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET
; ==>
; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END
; FLEXI-STREAMS::END :FROM-END T)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a T, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20)
; processing (DEFINE-CHAR-ENCODERS (FLEXI-UTF-32-BE-FORMAT FLEXI-CR-UTF-32-BE-FORMAT ...) ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/encode.lisp
; in:
; DEFINE-CHAR-ENCODERS (FLEXI-UTF-32-BE-FORMAT FLEXI-CR-UTF-32-BE-FORMAT
; FLEXI-CRLF-UTF-32-BE-FORMAT)
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT)
; (LET ((CHAR-CODE (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
; (FLEXI-STREAMS::OCTET-WRITER
; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -24)))
; (FLEXI-STREAMS::OCTET-WRITER
; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -16)))
; (FLEXI-STREAMS::OCTET-WRITER
; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -8)))
; (FLEXI-STREAMS::OCTET-WRITER (FLEXI-STREAMS::LOGAND* 255 CHAR-CODE))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT)
; (LET ((CHAR-CODE (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
; (FLEXI-STREAMS::OCTET-WRITER
; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -24)))
; (FLEXI-STREAMS::OCTET-WRITER
; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -16)))
; (FLEXI-STREAMS::OCTET-WRITER
; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -8)))
; (FLEXI-STREAMS::OCTET-WRITER (FLEXI-STREAMS::LOGAND* 255 CHAR-CODE))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET
; ==>
; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END
; FLEXI-STREAMS::END :FROM-END T)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a T, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20)
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
; --> SYMBOL-MACROLET PROGN LOCALLY LET CHAR-CODE LET
; --> FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY LET CHAR-CODE LET FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY LET CHAR-CODE LET FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET
; ==>
; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END
; FLEXI-STREAMS::END :FROM-END T)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a T, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20)
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN
; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET
; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET
; ==>
; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END
; FLEXI-STREAMS::END :FROM-END T)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a T, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (OR FLOAT (RATIONAL (-1) (1))) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
; ==>
; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20)
; processing (DEFMETHOD CHAR-TO-OCTETS ...)
; processing (DEFMETHOD CHAR-TO-OCTETS ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/encode-tmp93OFNPHA.fasl
; compilation finished in 0:00:07.753
; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/decode.lisp" (written 28 JUL 2021 07:07:50 PM):
; processing (IN-PACKAGE :FLEXI-STREAMS)
; processing (DEFUN RECOVER-FROM-ENCODING-ERROR ...)
; processing (DEFGENERIC OCTETS-TO-CHAR-CODE ...)
; processing (DEFGENERIC OCTETS-TO-STRING* ...)
; processing (DEFMETHOD OCTETS-TO-STRING* ...)
; processing (DEFMACRO DEFINE-SEQUENCE-READERS ...)
; processing (DEFMACRO DEFINE-CHAR-DECODERS ...)
; processing (DEFINE-CHAR-DECODERS (FLEXI-LATIN-1-FORMAT FLEXI-CR-LATIN-1-FORMAT ...) ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/decode.lisp
; in:
; DEFINE-CHAR-DECODERS (FLEXI-LATIN-1-FORMAT FLEXI-CR-LATIN-1-FORMAT
; FLEXI-CRLF-LATIN-1-FORMAT)
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-LATIN-1-FORMAT
; FLEXI-STREAMS::FLEXI-CR-LATIN-1-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-LATIN-1-FORMAT)
; FLEXI-STREAMS::OCTET-GETTER)
; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER
; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET*
; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET
; --> <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER
; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET*
; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET
; --> IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET PROGN FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET PROGN FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY LET PROGN FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET PROGN LET PROGN FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET PROGN LET PROGN FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY LET PROGN LET PROGN FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET
; --> AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> FLET #:GET-CHAR-CODE4 BLOCK LET PROGN FLEXI-STREAMS::OCTET-GETTER BLOCK
; --> PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY FLET #:GET-CHAR-CODE4 BLOCK LET PROGN FLEXI-STREAMS::OCTET-GETTER
; --> BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> FLET #:GET-CHAR-CODE4 BLOCK LET PROGN FLEXI-STREAMS::OCTET-GETTER BLOCK
; --> PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 32).
; The second argument is a T, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; processing (DEFINE-CHAR-DECODERS (FLEXI-ASCII-FORMAT FLEXI-CR-ASCII-FORMAT ...) ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/decode.lisp
; in:
; DEFINE-CHAR-DECODERS (FLEXI-ASCII-FORMAT FLEXI-CR-ASCII-FORMAT
; FLEXI-CRLF-ASCII-FORMAT)
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-ASCII-FORMAT
; FLEXI-STREAMS::FLEXI-CR-ASCII-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-ASCII-FORMAT)
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
; FLEXI-STREAMS:OCTET)))
; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER
; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET*
; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET
; --> <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER
; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET*
; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET
; --> IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
; FLEXI-STREAMS:OCTET))
; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-ASCII-FORMAT
; FLEXI-STREAMS::FLEXI-CR-ASCII-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-ASCII-FORMAT)
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
; FLEXI-STREAMS:OCTET)))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
; FLEXI-STREAMS:OCTET))
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-ASCII-FORMAT
; FLEXI-STREAMS::FLEXI-CR-ASCII-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-ASCII-FORMAT)
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
; FLEXI-STREAMS:OCTET)))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
; FLEXI-STREAMS:OCTET))
; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-ASCII-FORMAT
; FLEXI-STREAMS::FLEXI-CR-ASCII-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-ASCII-FORMAT)
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
; FLEXI-STREAMS:OCTET)))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET PROGN LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET PROGN LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY LET PROGN LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY LET PROGN LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET PROGN LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET PROGN LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
; FLEXI-STREAMS:OCTET))
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-ASCII-FORMAT
; FLEXI-STREAMS::FLEXI-CR-ASCII-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-ASCII-FORMAT)
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
; FLEXI-STREAMS:OCTET)))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
; FLEXI-STREAMS:OCTET))
; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-ASCII-FORMAT
; FLEXI-STREAMS::FLEXI-CR-ASCII-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-ASCII-FORMAT)
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
; FLEXI-STREAMS:OCTET)))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
; FLEXI-STREAMS:OCTET))
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-ASCII-FORMAT
; FLEXI-STREAMS::FLEXI-CR-ASCII-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-ASCII-FORMAT)
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
; FLEXI-STREAMS:OCTET)))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 32).
; The second argument is a T, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; processing (DEFINE-CHAR-DECODERS (FLEXI-8-BIT-FORMAT FLEXI-CR-8-BIT-FORMAT ...) ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/decode.lisp
; in:
; DEFINE-CHAR-DECODERS (FLEXI-8-BIT-FORMAT FLEXI-CR-8-BIT-FORMAT
; FLEXI-CRLF-8-BIT-FORMAT)
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT
; FLEXI-STREAMS::FLEXI-CR-8-BIT-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-8-BIT-FORMAT)
; (WITH-ACCESSORS ((FLEXI-STREAMS::DECODING-TABLE
; FLEXI-STREAMS::EXTERNAL-FORMAT-DECODING-TABLE))
; FORMAT
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (LET (#)
; (IF #
; #
; CHAR-CODE)))))
; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER
; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET*
; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET
; --> <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER
; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET*
; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET
; --> IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (LET ((CHAR-CODE (AREF # #)))
; (IF (OR (NULL CHAR-CODE) (= # 65533))
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
; CHAR-CODE)))
; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT
; FLEXI-STREAMS::FLEXI-CR-8-BIT-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-8-BIT-FORMAT)
; (WITH-ACCESSORS ((FLEXI-STREAMS::DECODING-TABLE
; FLEXI-STREAMS::EXTERNAL-FORMAT-DECODING-TABLE))
; FORMAT
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (LET (#)
; (IF #
; #
; CHAR-CODE)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (LET ((CHAR-CODE (AREF # #)))
; (IF (OR (NULL CHAR-CODE) (= # 65533))
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
; CHAR-CODE)))
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT
; FLEXI-STREAMS::FLEXI-CR-8-BIT-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-8-BIT-FORMAT)
; (WITH-ACCESSORS ((FLEXI-STREAMS::DECODING-TABLE
; FLEXI-STREAMS::EXTERNAL-FORMAT-DECODING-TABLE))
; FORMAT
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (LET (#)
; (IF #
; #
; CHAR-CODE)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (LET ((CHAR-CODE (AREF # #)))
; (IF (OR (NULL CHAR-CODE) (= # 65533))
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
; CHAR-CODE)))
; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT
; FLEXI-STREAMS::FLEXI-CR-8-BIT-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-8-BIT-FORMAT)
; (WITH-ACCESSORS ((FLEXI-STREAMS::DECODING-TABLE
; FLEXI-STREAMS::EXTERNAL-FORMAT-DECODING-TABLE))
; FORMAT
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (LET (#)
; (IF #
; #
; CHAR-CODE)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET PROGN LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET PROGN LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY LET PROGN LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY LET PROGN LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET PROGN LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET PROGN LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (LET ((CHAR-CODE (AREF # #)))
; (IF (OR (NULL CHAR-CODE) (= # 65533))
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
; CHAR-CODE)))
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT
; FLEXI-STREAMS::FLEXI-CR-8-BIT-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-8-BIT-FORMAT)
; (WITH-ACCESSORS ((FLEXI-STREAMS::DECODING-TABLE
; FLEXI-STREAMS::EXTERNAL-FORMAT-DECODING-TABLE))
; FORMAT
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (LET (#)
; (IF #
; #
; CHAR-CODE)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (LET ((CHAR-CODE (AREF # #)))
; (IF (OR (NULL CHAR-CODE) (= # 65533))
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
; CHAR-CODE)))
; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT
; FLEXI-STREAMS::FLEXI-CR-8-BIT-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-8-BIT-FORMAT)
; (WITH-ACCESSORS ((FLEXI-STREAMS::DECODING-TABLE
; FLEXI-STREAMS::EXTERNAL-FORMAT-DECODING-TABLE))
; FORMAT
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (LET (#)
; (IF #
; #
; CHAR-CODE)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (LET ((CHAR-CODE (AREF # #)))
; (IF (OR (NULL CHAR-CODE) (= # 65533))
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
; CHAR-CODE)))
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT
; FLEXI-STREAMS::FLEXI-CR-8-BIT-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-8-BIT-FORMAT)
; (WITH-ACCESSORS ((FLEXI-STREAMS::DECODING-TABLE
; FLEXI-STREAMS::EXTERNAL-FORMAT-DECODING-TABLE))
; FORMAT
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (LET (#)
; (IF #
; #
; CHAR-CODE)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 32).
; The second argument is a T, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; processing (DEFINE-CHAR-DECODERS (FLEXI-UTF-8-FORMAT FLEXI-CR-UTF-8-FORMAT ...) ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/decode.lisp
; in:
; DEFINE-CHAR-DECODERS (FLEXI-UTF-8-FORMAT FLEXI-CR-UTF-8-FORMAT
; FLEXI-CRLF-UTF-8-FORMAT)
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-8-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-8-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-8-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (FLET (#)
; (LET #
; #
; #)))))
; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER
; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET*
; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET
; --> <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER
; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET*
; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET
; --> IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::READ-NEXT-BYTE)
; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-8-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-8-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-8-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (FLET (#)
; (LET #
; #
; #)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::READ-NEXT-BYTE)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-8-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-8-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-8-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (FLET (#)
; (LET #
; #
; #)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::READ-NEXT-BYTE)
; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-8-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-8-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-8-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (FLET (#)
; (LET #
; #
; #)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY LET PROGN LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY LET PROGN LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET PROGN LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET PROGN LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET PROGN LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET PROGN LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::READ-NEXT-BYTE)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-8-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-8-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-8-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (FLET (#)
; (LET #
; #
; #)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::READ-NEXT-BYTE)
; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-8-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-8-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-8-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (FLET (#)
; (LET #
; #
; #)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET
; ==>
; (BLOCK FLEXI-STREAMS::CHAR-DECODER
; (LOCALLY
; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0)))
; (FLET ((#:GET-CHAR-CODE4 #
; #))
; (LET (#)
; (CASE #:CHAR-CODE2 # #)))))
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare
; the exit function DYNAMIC-EXTENT to avoid.
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER
; (RECOVER-FROM-ENCODING-ERROR FORMAT
; "Unexpected value #x~X at start of UTF-8 sequence." OCTET)).
; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT
; to avoid.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET
; ==>
; (BLOCK FLEXI-STREAMS::CHAR-DECODER
; (LOCALLY
; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0)))
; (FLET ((#:GET-CHAR-CODE4 #
; #))
; (LET (#)
; (CASE #:CHAR-CODE2 # #)))))
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare
; the exit function DYNAMIC-EXTENT to avoid.
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER
; (RECOVER-FROM-ENCODING-ERROR FORMAT
; "Unexpected value #x~X at start of UTF-8 sequence." OCTET)).
; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT
; to avoid.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET
; ==>
; (BLOCK FLEXI-STREAMS::CHAR-DECODER
; (LOCALLY
; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0)))
; (FLET ((#:GET-CHAR-CODE4 #
; #))
; (LET (#)
; (CASE #:CHAR-CODE2 # #)))))
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare
; the exit function DYNAMIC-EXTENT to avoid.
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER
; (RECOVER-FROM-ENCODING-ERROR FORMAT
; "Unexpected value #x~X at start of UTF-8 sequence." OCTET)).
; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT
; to avoid.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::READ-NEXT-BYTE)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-8-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-8-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-8-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (FLET (#)
; (LET #
; #
; #)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare
; the exit function DYNAMIC-EXTENT to avoid.
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER
; (RECOVER-FROM-ENCODING-ERROR FORMAT
; "Unexpected value #x~X at start of UTF-8 sequence." OCTET)).
; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT
; to avoid.
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 32).
; The second argument is a T, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; processing (DEFINE-CHAR-DECODERS (FLEXI-UTF-16-LE-FORMAT FLEXI-CR-UTF-16-LE-FORMAT ...) ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/decode.lisp
; in:
; DEFINE-CHAR-DECODERS (FLEXI-UTF-16-LE-FORMAT FLEXI-CR-UTF-16-LE-FORMAT
; FLEXI-CRLF-UTF-16-LE-FORMAT)
; (FLEXI-STREAMS::READ-NEXT-WORD)
;
; note: implementation limitation: couldn't inline expand because expansion refers to the optimized away object #<SB-C::CTRAN 1 {5603DB31}>.
;
; note: deleting unused function
; (SB-C::LOCAL-INLINE READ-NEXT-WORD)
; (FLEXI-STREAMS::READ-NEXT-BYTE)
; --> LET OR
; ==>
; (LET ((#:G33 FLEXI-STREAMS::OCTET-GETTER))
; (IF #:G33
; #:G33
; (COND
; (FLEXI-STREAMS::FIRST-OCTET-SEEN
; (RETURN-FROM FLEXI-STREAMS::OCTETS-TO-CHAR-CODE #))
; (T (RETURN-FROM FLEXI-STREAMS::OCTETS-TO-CHAR-CODE NIL)))))
;
; note: deleting unused function
; (LET ((#:G33 OCTET-GETTER)))
; (FLEXI-STREAMS::READ-NEXT-WORD)
;
; note: implementation limitation: couldn't inline expand because expansion refers to the optimized away object #<SB-C::CTRAN 1 {5603DB31}>.
;
; note: deleting unused function
; (SB-C::LOCAL-INLINE READ-NEXT-WORD)
; (FLEXI-STREAMS::READ-NEXT-BYTE)
; --> LET OR
; ==>
; (LET ((#:G35 FLEXI-STREAMS::OCTET-GETTER))
; (IF #:G35
; #:G35
; (COND
; (FLEXI-STREAMS::FIRST-OCTET-SEEN
; (RETURN-FROM FLEXI-STREAMS::OCTETS-TO-CHAR-CODE #))
; (T (RETURN-FROM FLEXI-STREAMS::OCTETS-TO-CHAR-CODE NIL)))))
;
; note: deleting unused function
; (LET ((#:G35 OCTET-GETTER)))
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-16-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-16-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-16-LE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (FLET (#)
; (DECLARE #)
; (LET #
; #
; #)))))
; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER
; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET*
; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET
; ==>
; (BLOCK FLEXI-STREAMS::OCTETS-TO-CHAR-CODE
; (SYMBOL-MACROLET ((FLEXI-STREAMS::OCTET-GETTER
; (FUNCALL FLEXI-STREAMS::READER)))
; (LET ((#:CHAR-CODE0 #))
; (WHEN (AND #:CHAR-CODE0 #)
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "Illegal code point ~A (#x~:*~X)." #:CHAR-CODE0))
; #:CHAR-CODE0)))
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM OCTETS-TO-CHAR-CODE NIL). Use GO/RETURN-FROM with SAFETY 0, or
; declare the exit function DYNAMIC-EXTENT to avoid.
; (FLEXI-STREAMS::READ-NEXT-BYTE)
; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> LET OR LET IF COND IF THE RETURN-FROM
; ==>
; NIL
;
; caught STYLE-WARNING:
; This is not a (MOD 1114112):
; NIL
; See also:
; The SBCL Manual, Node "Handling of Types"
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER AND IF PROG1 LET THE AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> LET OR LET IF COND IF THE RETURN-FROM
; ==>
; NIL
;
; caught STYLE-WARNING:
; This is not a (MOD 1114112):
; NIL
; See also:
; The SBCL Manual, Node "Handling of Types"
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER AND IF PROG1 LET THE AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-16-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-16-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-16-LE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (FLET (#)
; (DECLARE #)
; (LET #
; #
; #)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET
; ==>
; (BLOCK FLEXI-STREAMS::CHAR-DECODER
; (LOCALLY
; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0)))
; (FLET ((#:GET-CHAR-CODE4 #
; #))
; (LET (#)
; (CASE #:CHAR-CODE2 # #)))))
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER
; (RECOVER-FROM-ENCODING-ERROR FORMAT
; "End of data while in UTF-16 sequence.")).
; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT
; to avoid.
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare
; the exit function DYNAMIC-EXTENT to avoid.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET
; ==>
; (BLOCK FLEXI-STREAMS::CHAR-DECODER
; (LOCALLY
; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0)))
; (FLET ((#:GET-CHAR-CODE4 #
; #))
; (LET (#)
; (CASE #:CHAR-CODE2 # #)))))
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER
; (RECOVER-FROM-ENCODING-ERROR FORMAT
; "End of data while in UTF-16 sequence.")).
; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT
; to avoid.
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare
; the exit function DYNAMIC-EXTENT to avoid.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET
; ==>
; (BLOCK FLEXI-STREAMS::CHAR-DECODER
; (LOCALLY
; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0)))
; (FLET ((#:GET-CHAR-CODE4 #
; #))
; (LET (#)
; (CASE #:CHAR-CODE2 # #)))))
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER
; (RECOVER-FROM-ENCODING-ERROR FORMAT
; "End of data while in UTF-16 sequence.")).
; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT
; to avoid.
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare
; the exit function DYNAMIC-EXTENT to avoid.
; (FLEXI-STREAMS::READ-NEXT-BYTE)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-16-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-16-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-16-LE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (FLET (#)
; (DECLARE #)
; (LET #
; #
; #)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; (FLEXI-STREAMS::READ-NEXT-BYTE)
; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER AND IF PROG1 LET THE AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-16-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-16-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-16-LE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (FLET (#)
; (DECLARE #)
; (LET #
; #
; #)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER
; (RECOVER-FROM-ENCODING-ERROR FORMAT
; "End of data while in UTF-16 sequence.")).
; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT
; to avoid.
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare
; the exit function DYNAMIC-EXTENT to avoid.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 32).
; The second argument is a T, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; caught STYLE-WARNING:
; Derived type of
; (RETURN-FROM CHAR-DECODER NIL)
; in
; "a hairy form"
; is
; (VALUES &OPTIONAL NULL &REST T),
; conflicting with their asserted type
; (MOD 1114112).
; See also:
; The SBCL Manual, Node "Handling of Types"
; processing (DEFINE-CHAR-DECODERS (FLEXI-UTF-16-BE-FORMAT FLEXI-CR-UTF-16-BE-FORMAT ...) ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/decode.lisp
; in:
; DEFINE-CHAR-DECODERS (FLEXI-UTF-16-BE-FORMAT FLEXI-CR-UTF-16-BE-FORMAT
; FLEXI-CRLF-UTF-16-BE-FORMAT)
; (FLEXI-STREAMS::READ-NEXT-WORD)
;
; note: implementation limitation: couldn't inline expand because expansion refers to the optimized away object #<SB-C::CTRAN 2 {5738D2B1}>.
;
; note: deleting unused function
; (SB-C::LOCAL-INLINE READ-NEXT-WORD)
; (FLEXI-STREAMS::READ-NEXT-BYTE)
; --> LET OR
; ==>
; (LET ((#:G33 FLEXI-STREAMS::OCTET-GETTER))
; (IF #:G33
; #:G33
; (COND
; (FLEXI-STREAMS::FIRST-OCTET-SEEN
; (RETURN-FROM FLEXI-STREAMS::OCTETS-TO-CHAR-CODE #))
; (T (RETURN-FROM FLEXI-STREAMS::OCTETS-TO-CHAR-CODE NIL)))))
;
; note: deleting unused function
; (LET ((#:G33 OCTET-GETTER)))
; (FLEXI-STREAMS::READ-NEXT-WORD)
;
; note: implementation limitation: couldn't inline expand because expansion refers to the optimized away object #<SB-C::CTRAN 2 {5738D2B1}>.
;
; note: deleting unused function
; (SB-C::LOCAL-INLINE READ-NEXT-WORD)
; (FLEXI-STREAMS::READ-NEXT-BYTE)
; --> LET OR
; ==>
; (LET ((#:G35 FLEXI-STREAMS::OCTET-GETTER))
; (IF #:G35
; #:G35
; (COND
; (FLEXI-STREAMS::FIRST-OCTET-SEEN
; (RETURN-FROM FLEXI-STREAMS::OCTETS-TO-CHAR-CODE #))
; (T (RETURN-FROM FLEXI-STREAMS::OCTETS-TO-CHAR-CODE NIL)))))
;
; note: deleting unused function
; (LET ((#:G35 OCTET-GETTER)))
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-16-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-16-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-16-BE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (FLET (#)
; (DECLARE #)
; (LET #
; #
; #)))))
; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER
; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET*
; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET
; ==>
; (BLOCK FLEXI-STREAMS::OCTETS-TO-CHAR-CODE
; (SYMBOL-MACROLET ((FLEXI-STREAMS::OCTET-GETTER
; (FUNCALL FLEXI-STREAMS::READER)))
; (LET ((#:CHAR-CODE0 #))
; (WHEN (AND #:CHAR-CODE0 #)
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "Illegal code point ~A (#x~:*~X)." #:CHAR-CODE0))
; #:CHAR-CODE0)))
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM OCTETS-TO-CHAR-CODE NIL). Use GO/RETURN-FROM with SAFETY 0, or
; declare the exit function DYNAMIC-EXTENT to avoid.
; (FLEXI-STREAMS::READ-NEXT-BYTE)
; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> LET OR LET IF COND IF THE RETURN-FROM
; ==>
; NIL
;
; caught STYLE-WARNING:
; This is not a (MOD 1114112):
; NIL
; See also:
; The SBCL Manual, Node "Handling of Types"
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER AND IF PROG1 LET THE AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> LET OR LET IF COND IF THE RETURN-FROM
; ==>
; NIL
;
; caught STYLE-WARNING:
; This is not a (MOD 1114112):
; NIL
; See also:
; The SBCL Manual, Node "Handling of Types"
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER AND IF PROG1 LET THE AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-16-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-16-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-16-BE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (FLET (#)
; (DECLARE #)
; (LET #
; #
; #)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET
; ==>
; (BLOCK FLEXI-STREAMS::CHAR-DECODER
; (LOCALLY
; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0)))
; (FLET ((#:GET-CHAR-CODE4 #
; #))
; (LET (#)
; (CASE #:CHAR-CODE2 # #)))))
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER
; (RECOVER-FROM-ENCODING-ERROR FORMAT
; "End of data while in UTF-16 sequence.")).
; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT
; to avoid.
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare
; the exit function DYNAMIC-EXTENT to avoid.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET
; ==>
; (BLOCK FLEXI-STREAMS::CHAR-DECODER
; (LOCALLY
; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0)))
; (FLET ((#:GET-CHAR-CODE4 #
; #))
; (LET (#)
; (CASE #:CHAR-CODE2 # #)))))
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER
; (RECOVER-FROM-ENCODING-ERROR FORMAT
; "End of data while in UTF-16 sequence.")).
; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT
; to avoid.
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare
; the exit function DYNAMIC-EXTENT to avoid.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET
; ==>
; (BLOCK FLEXI-STREAMS::CHAR-DECODER
; (LOCALLY
; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0)))
; (FLET ((#:GET-CHAR-CODE4 #
; #))
; (LET (#)
; (CASE #:CHAR-CODE2 # #)))))
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER
; (RECOVER-FROM-ENCODING-ERROR FORMAT
; "End of data while in UTF-16 sequence.")).
; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT
; to avoid.
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare
; the exit function DYNAMIC-EXTENT to avoid.
; (FLEXI-STREAMS::READ-NEXT-BYTE)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER AND IF PROG1 LET THE AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-16-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-16-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-16-BE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (FLET (#)
; (DECLARE #)
; (LET #
; #
; #)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER
; (RECOVER-FROM-ENCODING-ERROR FORMAT
; "End of data while in UTF-16 sequence.")).
; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT
; to avoid.
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare
; the exit function DYNAMIC-EXTENT to avoid.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 32).
; The second argument is a T, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; caught STYLE-WARNING:
; Derived type of
; (RETURN-FROM CHAR-DECODER NIL)
; in
; "a hairy form"
; is
; (VALUES &OPTIONAL NULL &REST T),
; conflicting with their asserted type
; (MOD 1114112).
; See also:
; The SBCL Manual, Node "Handling of Types"
; processing (DEFINE-CHAR-DECODERS (FLEXI-GBK-FORMAT FLEXI-CR-GBK-FORMAT ...) ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/decode.lisp
; in:
; DEFINE-CHAR-DECODERS (FLEXI-GBK-FORMAT FLEXI-CR-GBK-FORMAT
; FLEXI-CRLF-GBK-FORMAT)
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (COND ((<= # 127) FLEXI-STREAMS:OCTET) ((= # 128) 8364) ((= # 255) 63733)
; (T
; (LET #
; #)))))
; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER
; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET*
; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET
; --> <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER
; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET*
; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET
; --> IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (COND
; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
; FLEXI-STREAMS:OCTET)
; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364)
; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733)
; (T
; (LET (#)
; (IF #
; #
; #)))))
; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (LET ((FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER))
; (IF (NULL FLEXI-STREAMS::NEXT-BYTE)
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "End of data while in GBK sequence.")
; (LET ((FLEXI-STREAMS::WORD #))
; (DECLARE (TYPE # FLEXI-STREAMS::WORD))
; (LET (#)
; (IF FLEXI-STREAMS:OCTET
; FLEXI-STREAMS:OCTET
; #)))))
; --> BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (COND
; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
; FLEXI-STREAMS:OCTET)
; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364)
; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733)
; (T
; (LET (#)
; (IF #
; #
; #)))))
; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (LET ((FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER))
; (IF (NULL FLEXI-STREAMS::NEXT-BYTE)
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "End of data while in GBK sequence.")
; (LET ((FLEXI-STREAMS::WORD #))
; (DECLARE (TYPE # FLEXI-STREAMS::WORD))
; (LET (#)
; (IF FLEXI-STREAMS:OCTET
; FLEXI-STREAMS:OCTET
; #)))))
; --> BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (COND
; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
; FLEXI-STREAMS:OCTET)
; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364)
; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733)
; (T
; (LET (#)
; (IF #
; #
; #)))))
; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (LET ((FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER))
; (IF (NULL FLEXI-STREAMS::NEXT-BYTE)
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "End of data while in GBK sequence.")
; (LET ((FLEXI-STREAMS::WORD #))
; (DECLARE (TYPE # FLEXI-STREAMS::WORD))
; (LET (#)
; (IF FLEXI-STREAMS:OCTET
; FLEXI-STREAMS:OCTET
; #)))))
; --> BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (COND ((<= # 127) FLEXI-STREAMS:OCTET) ((= # 128) 8364) ((= # 255) 63733)
; (T
; (LET #
; #)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (COND
; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
; FLEXI-STREAMS:OCTET)
; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364)
; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733)
; (T
; (LET (#)
; (IF #
; #
; #)))))
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (LET ((FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER))
; (IF (NULL FLEXI-STREAMS::NEXT-BYTE)
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "End of data while in GBK sequence.")
; (LET ((FLEXI-STREAMS::WORD #))
; (DECLARE (TYPE # FLEXI-STREAMS::WORD))
; (LET (#)
; (IF FLEXI-STREAMS:OCTET
; FLEXI-STREAMS:OCTET
; #)))))
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (COND ((<= # 127) FLEXI-STREAMS:OCTET) ((= # 128) 8364) ((= # 255) 63733)
; (T
; (LET #
; #)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (COND
; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
; FLEXI-STREAMS:OCTET)
; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364)
; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733)
; (T
; (LET (#)
; (IF #
; #
; #)))))
; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (LET ((FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER))
; (IF (NULL FLEXI-STREAMS::NEXT-BYTE)
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "End of data while in GBK sequence.")
; (LET ((FLEXI-STREAMS::WORD #))
; (DECLARE (TYPE # FLEXI-STREAMS::WORD))
; (LET (#)
; (IF FLEXI-STREAMS:OCTET
; FLEXI-STREAMS:OCTET
; #)))))
; --> BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (COND
; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
; FLEXI-STREAMS:OCTET)
; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364)
; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733)
; (T
; (LET (#)
; (IF #
; #
; #)))))
; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (LET ((FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER))
; (IF (NULL FLEXI-STREAMS::NEXT-BYTE)
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "End of data while in GBK sequence.")
; (LET ((FLEXI-STREAMS::WORD #))
; (DECLARE (TYPE # FLEXI-STREAMS::WORD))
; (LET (#)
; (IF FLEXI-STREAMS:OCTET
; FLEXI-STREAMS:OCTET
; #)))))
; --> BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (COND
; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
; FLEXI-STREAMS:OCTET)
; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364)
; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733)
; (T
; (LET (#)
; (IF #
; #
; #)))))
; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (LET ((FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER))
; (IF (NULL FLEXI-STREAMS::NEXT-BYTE)
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "End of data while in GBK sequence.")
; (LET ((FLEXI-STREAMS::WORD #))
; (DECLARE (TYPE # FLEXI-STREAMS::WORD))
; (LET (#)
; (IF FLEXI-STREAMS:OCTET
; FLEXI-STREAMS:OCTET
; #)))))
; --> BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (COND ((<= # 127) FLEXI-STREAMS:OCTET) ((= # 128) 8364) ((= # 255) 63733)
; (T
; (LET #
; #)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET PROGN LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET PROGN LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY LET PROGN LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY LET PROGN LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET PROGN LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET PROGN LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (COND
; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
; FLEXI-STREAMS:OCTET)
; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364)
; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733)
; (T
; (LET (#)
; (IF #
; #
; #)))))
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (LET ((FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER))
; (IF (NULL FLEXI-STREAMS::NEXT-BYTE)
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "End of data while in GBK sequence.")
; (LET ((FLEXI-STREAMS::WORD #))
; (DECLARE (TYPE # FLEXI-STREAMS::WORD))
; (LET (#)
; (IF FLEXI-STREAMS:OCTET
; FLEXI-STREAMS:OCTET
; #)))))
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (COND ((<= # 127) FLEXI-STREAMS:OCTET) ((= # 128) 8364) ((= # 255) 63733)
; (T
; (LET #
; #)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (COND
; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
; FLEXI-STREAMS:OCTET)
; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364)
; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733)
; (T
; (LET (#)
; (IF #
; #
; #)))))
; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (LET ((FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER))
; (IF (NULL FLEXI-STREAMS::NEXT-BYTE)
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "End of data while in GBK sequence.")
; (LET ((FLEXI-STREAMS::WORD #))
; (DECLARE (TYPE # FLEXI-STREAMS::WORD))
; (LET (#)
; (IF FLEXI-STREAMS:OCTET
; FLEXI-STREAMS:OCTET
; #)))))
; --> BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (COND
; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
; FLEXI-STREAMS:OCTET)
; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364)
; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733)
; (T
; (LET (#)
; (IF #
; #
; #)))))
; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (LET ((FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER))
; (IF (NULL FLEXI-STREAMS::NEXT-BYTE)
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "End of data while in GBK sequence.")
; (LET ((FLEXI-STREAMS::WORD #))
; (DECLARE (TYPE # FLEXI-STREAMS::WORD))
; (LET (#)
; (IF FLEXI-STREAMS:OCTET
; FLEXI-STREAMS:OCTET
; #)))))
; --> BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (COND
; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
; FLEXI-STREAMS:OCTET)
; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364)
; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733)
; (T
; (LET (#)
; (IF #
; #
; #)))))
; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (LET ((FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER))
; (IF (NULL FLEXI-STREAMS::NEXT-BYTE)
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "End of data while in GBK sequence.")
; (LET ((FLEXI-STREAMS::WORD #))
; (DECLARE (TYPE # FLEXI-STREAMS::WORD))
; (LET (#)
; (IF FLEXI-STREAMS:OCTET
; FLEXI-STREAMS:OCTET
; #)))))
; --> BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (COND ((<= # 127) FLEXI-STREAMS:OCTET) ((= # 128) 8364) ((= # 255) 63733)
; (T
; (LET #
; #)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (COND
; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
; FLEXI-STREAMS:OCTET)
; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364)
; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733)
; (T
; (LET (#)
; (IF #
; #
; #)))))
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (LET ((FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER))
; (IF (NULL FLEXI-STREAMS::NEXT-BYTE)
; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
; "End of data while in GBK sequence.")
; (LET ((FLEXI-STREAMS::WORD #))
; (DECLARE (TYPE # FLEXI-STREAMS::WORD))
; (LET (#)
; (IF FLEXI-STREAMS:OCTET
; FLEXI-STREAMS:OCTET
; #)))))
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
; (COND ((<= # 127) FLEXI-STREAMS:OCTET) ((= # 128) 8364) ((= # 255) 63733)
; (T
; (LET #
; #)))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 32).
; The second argument is a T, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; processing (DEFINE-CHAR-DECODERS (FLEXI-UTF-32-LE-FORMAT FLEXI-CR-UTF-32-LE-FORMAT ...) ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/decode.lisp
; in:
; DEFINE-CHAR-DECODERS (FLEXI-UTF-32-LE-FORMAT FLEXI-CR-UTF-32-LE-FORMAT
; FLEXI-CRLF-UTF-32-LE-FORMAT)
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...)
; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
; ==>
; (+ #:LOOP-SUM-16 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...))))
; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER
; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET*
; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET
; --> <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER
; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET*
; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET
; --> IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)
; ==>
; (ASH FLEXI-STREAMS:OCTET COUNT)
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first result of inline ASH
; (FLEXI-STREAMS::READ-NEXT-BYTE)
; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...)
; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
; ==>
; (+ #:LOOP-SUM-126 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...)
; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
; ==>
; (+ #:LOOP-SUM-141 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...)
; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
; ==>
; (+ #:LOOP-SUM-109 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)
; ==>
; (ASH FLEXI-STREAMS:OCTET COUNT)
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first result of inline ASH
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first result of inline ASH
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first result of inline ASH
; (FLEXI-STREAMS::READ-NEXT-BYTE)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first result of inline ASH
; (FLEXI-STREAMS::READ-NEXT-BYTE)
; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...)
; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
; ==>
; (+ #:LOOP-SUM-460 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET PROGN LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET PROGN LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...)
; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
; ==>
; (+ #:LOOP-SUM-476 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY LET PROGN LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY LET PROGN LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...)
; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
; ==>
; (+ #:LOOP-SUM-442 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET PROGN LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET PROGN LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)
; ==>
; (ASH FLEXI-STREAMS:OCTET COUNT)
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first result of inline ASH
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first result of inline ASH
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first result of inline ASH
; (FLEXI-STREAMS::READ-NEXT-BYTE)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first result of inline ASH
; (FLEXI-STREAMS::READ-NEXT-BYTE)
; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET
; ==>
; (BLOCK FLEXI-STREAMS::CHAR-DECODER
; (LOCALLY
; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0)))
; (FLET ((#:GET-CHAR-CODE4 #
; #))
; (LET (#)
; (CASE #:CHAR-CODE2 # #)))))
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare
; the exit function DYNAMIC-EXTENT to avoid.
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER
; (RECOVER-FROM-ENCODING-ERROR FORMAT
; "End of data while in UTF-32 sequence.")).
; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT
; to avoid.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET
; ==>
; (BLOCK FLEXI-STREAMS::CHAR-DECODER
; (LOCALLY
; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0)))
; (FLET ((#:GET-CHAR-CODE4 #
; #))
; (LET (#)
; (CASE #:CHAR-CODE2 # #)))))
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare
; the exit function DYNAMIC-EXTENT to avoid.
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER
; (RECOVER-FROM-ENCODING-ERROR FORMAT
; "End of data while in UTF-32 sequence.")).
; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT
; to avoid.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET
; ==>
; (BLOCK FLEXI-STREAMS::CHAR-DECODER
; (LOCALLY
; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0)))
; (FLET ((#:GET-CHAR-CODE4 #
; #))
; (LET (#)
; (CASE #:CHAR-CODE2 # #)))))
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare
; the exit function DYNAMIC-EXTENT to avoid.
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER
; (RECOVER-FROM-ENCODING-ERROR FORMAT
; "End of data while in UTF-32 sequence.")).
; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT
; to avoid.
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...)
; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
; ==>
; (+ #:LOOP-SUM-800 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...)
; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
; ==>
; (+ #:LOOP-SUM-817 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...)
; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
; ==>
; (+ #:LOOP-SUM-781 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)
; ==>
; (ASH FLEXI-STREAMS:OCTET COUNT)
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first result of inline ASH
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first result of inline ASH
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first result of inline ASH
; (FLEXI-STREAMS::READ-NEXT-BYTE)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare
; the exit function DYNAMIC-EXTENT to avoid.
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER
; (RECOVER-FROM-ENCODING-ERROR FORMAT
; "End of data while in UTF-32 sequence.")).
; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT
; to avoid.
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 32).
; The second argument is a T, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first result of inline ASH
; processing (DEFINE-CHAR-DECODERS (FLEXI-UTF-32-BE-FORMAT FLEXI-CR-UTF-32-BE-FORMAT ...) ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/decode.lisp
; in:
; DEFINE-CHAR-DECODERS (FLEXI-UTF-32-BE-FORMAT FLEXI-CR-UTF-32-BE-FORMAT
; FLEXI-CRLF-UTF-32-BE-FORMAT)
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...)
; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
; ==>
; (+ #:LOOP-SUM-16 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...))))
; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER
; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET*
; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET
; --> <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER
; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET*
; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET
; --> IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)
; ==>
; (ASH FLEXI-STREAMS:OCTET COUNT)
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first result of inline ASH
; (FLEXI-STREAMS::READ-NEXT-BYTE)
; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...)
; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
; ==>
; (+ #:LOOP-SUM-126 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...)
; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
; ==>
; (+ #:LOOP-SUM-141 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...)
; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
; ==>
; (+ #:LOOP-SUM-109 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)
; ==>
; (ASH FLEXI-STREAMS:OCTET COUNT)
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first result of inline ASH
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first result of inline ASH
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first result of inline ASH
; (FLEXI-STREAMS::READ-NEXT-BYTE)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first result of inline ASH
; (FLEXI-STREAMS::READ-NEXT-BYTE)
; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...)
; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
; ==>
; (+ #:LOOP-SUM-460 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET PROGN LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET PROGN LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...)
; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
; ==>
; (+ #:LOOP-SUM-476 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY LET PROGN LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY LET PROGN LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...)
; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
; ==>
; (+ #:LOOP-SUM-442 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET PROGN LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> LET PROGN LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)
; ==>
; (ASH FLEXI-STREAMS:OCTET COUNT)
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first result of inline ASH
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first result of inline ASH
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first result of inline ASH
; (FLEXI-STREAMS::READ-NEXT-BYTE)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first result of inline ASH
; (FLEXI-STREAMS::READ-NEXT-BYTE)
; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET
; ==>
; (BLOCK FLEXI-STREAMS::CHAR-DECODER
; (LOCALLY
; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0)))
; (FLET ((#:GET-CHAR-CODE4 #
; #))
; (LET (#)
; (CASE #:CHAR-CODE2 # #)))))
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare
; the exit function DYNAMIC-EXTENT to avoid.
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER
; (RECOVER-FROM-ENCODING-ERROR FORMAT
; "End of data while in UTF-32 sequence.")).
; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT
; to avoid.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET
; ==>
; (BLOCK FLEXI-STREAMS::CHAR-DECODER
; (LOCALLY
; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0)))
; (FLET ((#:GET-CHAR-CODE4 #
; #))
; (LET (#)
; (CASE #:CHAR-CODE2 # #)))))
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare
; the exit function DYNAMIC-EXTENT to avoid.
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER
; (RECOVER-FROM-ENCODING-ERROR FORMAT
; "End of data while in UTF-32 sequence.")).
; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT
; to avoid.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET
; ==>
; (BLOCK FLEXI-STREAMS::CHAR-DECODER
; (LOCALLY
; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0)))
; (FLET ((#:GET-CHAR-CODE4 #
; #))
; (LET (#)
; (CASE #:CHAR-CODE2 # #)))))
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare
; the exit function DYNAMIC-EXTENT to avoid.
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER
; (RECOVER-FROM-ENCODING-ERROR FORMAT
; "End of data while in UTF-32 sequence.")).
; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT
; to avoid.
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...)
; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
; ==>
; (+ #:LOOP-SUM-817 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE
; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK
; --> LOCALLY FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...)
; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
; ==>
; (+ #:LOOP-SUM-781 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...)
; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
; ==>
; (+ #:LOOP-SUM-800 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET
; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
; (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)
; ==>
; (ASH FLEXI-STREAMS:OCTET COUNT)
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first result of inline ASH
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first result of inline ASH
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first result of inline ASH
; (FLEXI-STREAMS::READ-NEXT-BYTE)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare
; the exit function DYNAMIC-EXTENT to avoid.
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM CHAR-DECODER
; (RECOVER-FROM-ENCODING-ERROR FORMAT
; "End of data while in UTF-32 sequence.")).
; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT
; to avoid.
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT
; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT)
; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
; '#))
; (LOOP FLEXI-STREAMS::FOR
; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
; FLEXI-STREAMS::FOR ...))))
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 32).
; The second argument is a T, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first result of inline ASH
; processing (DEFMETHOD OCTETS-TO-CHAR-CODE ...)
; processing (DEFMETHOD OCTETS-TO-CHAR-CODE ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/decode-tmpOH5AKS8D.fasl
; compilation finished in 0:00:16.100
WARNING:
Lisp compilation had style-warnings while
compiling #<CL-SOURCE-FILE "flexi-streams" "decode">
; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/in-memory.lisp" (written 28 JUL 2021 07:07:50 PM):
; processing (IN-PACKAGE :FLEXI-STREAMS)
; processing (DEFCLASS IN-MEMORY-STREAM ...)
; processing (DEFCLASS IN-MEMORY-INPUT-STREAM ...)
; processing (DEFCLASS IN-MEMORY-OUTPUT-STREAM ...)
; processing (DEFCLASS LIST-STREAM ...)
; processing (DEFCLASS VECTOR-STREAM ...)
; processing (DEFCLASS LIST-INPUT-STREAM ...)
; processing (DEFCLASS VECTOR-INPUT-STREAM ...)
; processing (DEFCLASS VECTOR-OUTPUT-STREAM ...)
; processing (DEFMETHOD CHECK-IF-OPEN ...)
; processing (DEFMETHOD STREAM-ELEMENT-TYPE ...)
; processing (DEFGENERIC PEEK-BYTE ...)
; processing (DEFMETHOD PEEK-BYTE ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/in-memory.lisp
; in: DEFMETHOD PEEK-BYTE (VECTOR-INPUT-STREAM)
; (= BYTE FLEXI-STREAMS::PEEK-TYPE)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
; (LOOP :FOR BYTE = (READ-BYTE STREAM FLEXI-STREAMS::EOF-ERROR-P :EOF)
; :FOR FLEXI-STREAMS::NEW-INDEX :FROM FLEXI-STREAMS::INDEX
; :UNTIL (COND ((EQ BYTE :EOF) (RETURN FLEXI-STREAMS::EOF-VALUE))
; ((NULL FLEXI-STREAMS::PEEK-TYPE))
; ((EQ FLEXI-STREAMS::PEEK-TYPE 'T) (PLUSP BYTE))
; ((= BYTE FLEXI-STREAMS::PEEK-TYPE)))
; :FINALLY ...)
; --> LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE 1+
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; (PLUSP BYTE)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
; (LOOP :FOR BYTE = (READ-BYTE STREAM FLEXI-STREAMS::EOF-ERROR-P :EOF)
; :FOR FLEXI-STREAMS::NEW-INDEX :FROM FLEXI-STREAMS::INDEX
; :UNTIL (COND ((EQ BYTE :EOF) (RETURN FLEXI-STREAMS::EOF-VALUE))
; ((NULL FLEXI-STREAMS::PEEK-TYPE))
; ((EQ FLEXI-STREAMS::PEEK-TYPE 'T) (PLUSP BYTE))
; ((= BYTE FLEXI-STREAMS::PEEK-TYPE)))
; :FINALLY ...)
; --> LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE 1+
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
; processing (DEFMETHOD PEEK-BYTE ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/in-memory.lisp
; in: DEFMETHOD PEEK-BYTE (LIST-INPUT-STREAM)
; (= BYTE FLEXI-STREAMS::PEEK-TYPE)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
; (PLUSP BYTE)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
; processing (DEFMETHOD TRANSFORM-OCTET ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/in-memory.lisp
; in: DEFMETHOD TRANSFORM-OCTET (IN-MEMORY-STREAM T)
; (FUNCALL (OR (FLEXI-STREAMS::IN-MEMORY-STREAM-TRANSFORMER STREAM) #'IDENTITY)
; FLEXI-STREAMS:OCTET)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; processing (DEFMETHOD STREAM-READ-BYTE ...)
; processing (DEFMETHOD STREAM-LISTEN ...)
; processing (DEFMETHOD STREAM-READ-SEQUENCE ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/in-memory.lisp
; in: DEFMETHOD STREAM-READ-SEQUENCE (LIST-INPUT-STREAM T T T)
; (FUNCALL FLEXI-STREAMS::TRANSFORMER ELT)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TRANSFORMER is not known to be a function
; (SETF (ELT SEQUENCE FLEXI-STREAMS::INDEX)
; (IF FLEXI-STREAMS::TRANSFORMER
; (FUNCALL FLEXI-STREAMS::TRANSFORMER ELT)
; ELT))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a LIST.
; processing (DEFMETHOD STREAM-READ-BYTE ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/in-memory.lisp
; in: DEFMETHOD STREAM-READ-BYTE (VECTOR-INPUT-STREAM)
; (AREF VECTOR FLEXI-STREAMS::CURRENT-INDEX)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; processing (DEFMETHOD STREAM-LISTEN ...)
; processing (DEFMETHOD STREAM-READ-SEQUENCE ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/in-memory.lisp
; in: DEFMETHOD STREAM-READ-SEQUENCE (VECTOR-INPUT-STREAM T T T)
; (AREF VECTOR FLEXI-STREAMS::VECTOR-INDEX)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (FUNCALL FLEXI-STREAMS::TRANSFORMER ELT)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TRANSFORMER is not known to be a function
; (SETF (ELT SEQUENCE FLEXI-STREAMS::INDEX)
; (IF FLEXI-STREAMS::TRANSFORMER
; (FUNCALL FLEXI-STREAMS::TRANSFORMER ELT)
; ELT))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a LIST.
; processing (DEFMETHOD STREAM-WRITE-BYTE ...)
; processing (DEFMETHOD STREAM-WRITE-SEQUENCE ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/in-memory.lisp
; in: DEFMETHOD STREAM-WRITE-SEQUENCE (VECTOR-OUTPUT-STREAM T T T)
; (ELT SEQUENCE FLEXI-STREAMS::INDEX)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a LIST.
; processing (DEFMETHOD STREAM-FILE-POSITION ...)
; processing (DEFMETHOD (SETF STREAM-FILE-POSITION) ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/in-memory.lisp
; in: DEFMETHOD (SETF STREAM-FILE-POSITION) (T VECTOR-INPUT-STREAM)
; (<= 0 FLEXI-STREAMS::POSITION-SPEC FLEXI-STREAMS::END)
;
; note: unable to open code because: The operands might not be the same type.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The second argument is a REAL, not a (UNSIGNED-BYTE 32).
; etc.
; processing (DEFMETHOD STREAM-FILE-POSITION ...)
; processing (DEFMETHOD (SETF STREAM-FILE-POSITION) ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/in-memory.lisp
; in: DEFMETHOD (SETF STREAM-FILE-POSITION) (T VECTOR-OUTPUT-STREAM)
; (ARRAY-TOTAL-SIZE VECTOR)
;
; note: unable to optimize because: can't tell the rank at compile time
; (<= 0 FLEXI-STREAMS::POSITION-SPEC ARRAY-TOTAL-SIZE-LIMIT)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
; processing (DEFMETHOD MAKE-IN-MEMORY-INPUT-STREAM ...)
; processing (DEFMETHOD MAKE-IN-MEMORY-INPUT-STREAM ...)
; processing (DEFUN MAKE-OUTPUT-VECTOR ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/in-memory.lisp
; in: DEFUN MAKE-OUTPUT-VECTOR
; (MAKE-ARRAY 0 :ADJUSTABLE T :FILL-POINTER 0 :ELEMENT-TYPE
; FLEXI-STREAMS::ELEMENT-TYPE)
;
; note: unable to optimize because: ELEMENT-TYPE is not constant.
; processing (DEFUN MAKE-IN-MEMORY-OUTPUT-STREAM ...)
; processing (DEFMETHOD GET-OUTPUT-STREAM-SEQUENCE ...)
; processing (DEFMETHOD OUTPUT-STREAM-SEQUENCE-LENGTH ...)
; processing (DEFMACRO WITH-INPUT-FROM-SEQUENCE ...)
; processing (DEFMACRO WITH-OUTPUT-TO-SEQUENCE ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/in-memory-tmpTNV77KDS.fasl
; compilation finished in 0:00:00.548
; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/stream.lisp" (written 28 JUL 2021 07:07:50 PM):
; processing (IN-PACKAGE :FLEXI-STREAMS)
; processing (DEFCLASS FLEXI-STREAM ...)
; processing (DEFMETHOD INITIALIZE-INSTANCE ...)
; processing (DEFMETHOD (SETF FLEXI-STREAM-EXTERNAL-FORMAT) ...)
; processing (DEFMETHOD (SETF FLEXI-STREAM-ELEMENT-TYPE) ...)
; processing (DEFMETHOD STREAM-ELEMENT-TYPE ...)
; processing (DEFMETHOD CLOSE ...)
; processing (DEFMETHOD OPEN-STREAM-P ...)
; processing (DEFMETHOD STREAM-FILE-POSITION ...)
; processing (DEFMETHOD (SETF STREAM-FILE-POSITION) ...)
; processing (DEFCLASS FLEXI-OUTPUT-STREAM ...)
; processing (DEFCLASS FLEXI-INPUT-STREAM ...)
; processing (DEFCLASS FLEXI-IO-STREAM ...)
; processing (DEFUN MAKE-FLEXI-STREAM ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/stream-tmp9AOKGDLT.fasl
; compilation finished in 0:00:00.164
; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/output.lisp" (written 28 JUL 2021 07:07:50 PM):
; processing (IN-PACKAGE :FLEXI-STREAMS)
; processing (DEFGENERIC WRITE-BYTE* ...)
; processing (DEFMETHOD WRITE-BYTE* ...)
; processing (DEFMETHOD STREAM-WRITE-CHAR ...)
; processing (DEFMETHOD STREAM-WRITE-CHAR ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/output.lisp
; in: DEFMETHOD STREAM-WRITE-CHAR :AFTER (FLEXI-OUTPUT-STREAM T)
; (INCF (THE INTEGER FLEXI-STREAMS::COLUMN))
; ==>
; (+ 1 (THE INTEGER (FLEXI-STREAMS:FLEXI-STREAM-COLUMN #:G68)))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
; processing (DEFMETHOD STREAM-CLEAR-OUTPUT ...)
; processing (DEFMETHOD STREAM-FINISH-OUTPUT ...)
; processing (DEFMETHOD STREAM-FORCE-OUTPUT ...)
; processing (DEFMETHOD STREAM-LINE-COLUMN ...)
; processing (DEFMETHOD STREAM-WRITE-BYTE ...)
; processing (DEFMETHOD STREAM-WRITE-SEQUENCE ...)
; processing (DEFMETHOD STREAM-WRITE-STRING ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/output.lisp
; in: DEFMETHOD STREAM-WRITE-STRING (FLEXI-OUTPUT-STREAM T)
; (LENGTH STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/output-tmpXS9JOGMS.fasl
; compilation finished in 0:00:00.132
; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/input.lisp" (written 28 JUL 2021 07:07:50 PM):
; processing (IN-PACKAGE :FLEXI-STREAMS)
; processing (DEFMETHOD READ-BYTE* ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/input.lisp
; in: DEFMETHOD READ-BYTE* (FLEXI-INPUT-STREAM)
; (AND FLEXI-STREAMS::BOUND (>= POSITION FLEXI-STREAMS::BOUND))
; --> >=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a (OR NULL INTEGER), not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a (OR NULL INTEGER), not a (UNSIGNED-BYTE 32).
; etc.
; (INCF POSITION)
; ==>
; (+ 1 (THE INTEGER (FLEXI-STREAMS:FLEXI-STREAM-POSITION #:G08)))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
; (DECF POSITION)
; --> SB-IMPL::XSUBTRACT BLOCK
; ==>
; (- SB-IMPL::B SB-IMPL::A)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
; processing (DEFMETHOD STREAM-CLEAR-INPUT ...)
; processing (DEFMETHOD STREAM-LISTEN ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/input.lisp
; in: DEFMETHOD STREAM-LISTEN (FLEXI-INPUT-STREAM)
; (AND FLEXI-STREAMS::BOUND (>= POSITION FLEXI-STREAMS::BOUND))
; --> >=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a (OR NULL INTEGER), not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a (OR NULL INTEGER), not a (UNSIGNED-BYTE 32).
; etc.
; processing (DEFMETHOD STREAM-READ-BYTE ...)
; processing (DEFUN UNREAD-CHAR% ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/input.lisp
; in: DEFUN UNREAD-CHAR%
; (DECF POSITION FLEXI-STREAMS::COUNTER)
; --> SB-IMPL::XSUBTRACT BLOCK
; ==>
; (- SB-IMPL::B SB-IMPL::A)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; processing (DEFMETHOD STREAM-READ-CHAR ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/input.lisp
; in: DEFMETHOD STREAM-READ-CHAR (FLEXI-INPUT-STREAM)
; (OR (CODE-CHAR CHAR-CODE) CHAR-CODE)
; --> IF
; ==>
; CHAR-CODE
;
; note: deleting unreachable code
; processing (DEFMETHOD STREAM-READ-CHAR-NO-HANG ...)
; processing (DEFMETHOD STREAM-READ-SEQUENCE ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/input.lisp
; in: DEFMETHOD STREAM-READ-SEQUENCE (FLEXI-INPUT-STREAM T T T)
; (- FLEXI-STREAMS::BOUND POSITION)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; (+ FLEXI-STREAMS::START (- FLEXI-STREAMS::BOUND POSITION))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; (REPLACE SEQUENCE FLEXI-STREAMS::OCTET-STACK :START1 FLEXI-STREAMS::START
; :END1 FLEXI-STREAMS::END)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES
; (SIMPLE-ARRAY * (*))
; &REST T).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a SIMPLE-BASE-STRING.
; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)).
; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES SIMPLE-BASE-STRING
; &REST T).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)).
; The second argument is a SEQUENCE, not a SIMPLE-BASE-STRING.
; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES
; (SIMPLE-ARRAY CHARACTER
; (*))
; &REST T).
; (LENGTH FLEXI-STREAMS::OCTET-STACK)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (ELT SEQUENCE (1- FLEXI-STREAMS::INDEX))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a LIST.
; (INCF POSITION (- FLEXI-STREAMS::INDEX FLEXI-STREAMS::START))
; ==>
; (+ (- FLEXI-STREAMS::INDEX FLEXI-STREAMS::START)
; (FLEXI-STREAMS:FLEXI-STREAM-POSITION #:G1130))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; (MIN FLEXI-STREAMS::END
; (+ FLEXI-STREAMS::START (- FLEXI-STREAMS::BOUND POSITION)))
;
; note: unable to open code because: The operands might not be the same type.
; (- FLEXI-STREAMS::BOUND POSITION)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a T, not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &REST T).
; etc.
; (+ FLEXI-STREAMS::START (- FLEXI-STREAMS::BOUND POSITION))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (INTEGER -536870912 536870910), not a (UNSIGNED-BYTE
; 32).
; The second argument is a NUMBER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (MIN FLEXI-STREAMS::END
; (+ FLEXI-STREAMS::START (- FLEXI-STREAMS::BOUND POSITION)))
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The second argument is a REAL, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a (INTEGER -536870911 536870911), not a (UNSIGNED-BYTE
; 32).
; The second argument is a REAL, not a (UNSIGNED-BYTE 32).
; etc.
; (INCF POSITION (- FLEXI-STREAMS::INDEX FLEXI-STREAMS::START))
; ==>
; (+ (- FLEXI-STREAMS::INDEX FLEXI-STREAMS::START)
; (FLEXI-STREAMS:FLEXI-STREAM-POSITION #:G1130))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -536870910 1073741820), not a FIXNUM.
; The second argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (INTEGER -536870910 1073741820), not a (UNSIGNED-BYTE
; 32).
; The second argument is a T, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: doing signed word to integer coercion (cost 20)
; (INCF FLEXI-STREAMS::INDEX FLEXI-STREAMS::OCTETS-FLUSHED)
; --> THE MULTIPLE-VALUE-BIND LET UNLESS IF
; ==>
; (SB-INT:FIXNUMP #:G77)
;
; note: doing signed word to integer coercion (cost 20), for:
; the first argument of FIXNUMP
; processing (DEFMETHOD STREAM-UNREAD-CHAR ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/input.lisp
; in: DEFMETHOD STREAM-UNREAD-CHAR (FLEXI-INPUT-STREAM T)
; (= (CHAR-CODE CHAR) FLEXI-STREAMS::LAST-CHAR-CODE)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
; processing (DEFMETHOD UNREAD-BYTE ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/input.lisp
; in: DEFMETHOD UNREAD-BYTE (T FLEXI-INPUT-STREAM)
; (= BYTE FLEXI-STREAMS::LAST-OCTET)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
;
; note: forced to do full call
; unable to do inline float comparison (cost 3) because:
; The first argument is a T, not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
; unable to do inline float comparison (cost 3) because:
; The first argument is a T, not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
; (DECF (THE INTEGER POSITION))
; --> SB-IMPL::XSUBTRACT BLOCK
; ==>
; (- SB-IMPL::B SB-IMPL::A)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
; processing (DEFMETHOD PEEK-BYTE ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/input.lisp
; in: DEFMETHOD PEEK-BYTE (FLEXI-INPUT-STREAM)
; (= FLEXI-STREAMS:OCTET FLEXI-STREAMS::PEEK-TYPE)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
; (PLUSP FLEXI-STREAMS:OCTET)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/input-tmpERBDX74X.fasl
; compilation finished in 0:00:00.264
; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/io.lisp" (written 28 JUL 2021 07:07:50 PM):
; processing (IN-PACKAGE :FLEXI-STREAMS)
; processing (DEFMETHOD RESET-INPUT-STATE ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/io.lisp
; in: DEFMETHOD RESET-INPUT-STATE (FLEXI-IO-STREAM)
; (LENGTH FLEXI-STREAMS::OCTET-STACK)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; processing (DEFMETHOD STREAM-WRITE-BYTE ...)
; processing (DEFMETHOD STREAM-WRITE-CHAR ...)
; processing (DEFMETHOD STREAM-WRITE-SEQUENCE ...)
; processing (DEFMETHOD STREAM-CLEAR-OUTPUT ...)
; processing (DEFMETHOD RESET-OUTPUT-STATE ...)
; processing (DEFMETHOD STREAM-READ-BYTE ...)
; processing (DEFMETHOD STREAM-READ-CHAR ...)
; processing (DEFMETHOD STREAM-READ-SEQUENCE ...)
; processing (DEFMETHOD STREAM-UNREAD-CHAR ...)
; processing (DEFMETHOD UNREAD-BYTE ...)
; processing (DEFMETHOD STREAM-CLEAR-INPUT ...)
; processing (DEFMETHOD WRITE-BYTE* ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/io.lisp
; in: DEFMETHOD WRITE-BYTE* :AFTER (T FLEXI-IO-STREAM)
; (INCF POSITION)
; ==>
; (+ 1 (FLEXI-STREAMS:FLEXI-STREAM-POSITION #:G56))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/io-tmpTQIEF2IQ.fasl
; compilation finished in 0:00:00.144
; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/strings.lisp" (written 28 JUL 2021 07:07:50 PM):
; processing (IN-PACKAGE :FLEXI-STREAMS)
; processing (DEFUN STRING-TO-OCTETS ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/strings.lisp
; in: DEFUN STRING-TO-OCTETS
; (LENGTH STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; processing (DEFUN OCTETS-TO-STRING ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/strings.lisp
; in: DEFUN OCTETS-TO-STRING
; (LENGTH SEQUENCE)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; processing (DEFUN OCTET-LENGTH ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/strings.lisp
; in: DEFUN OCTET-LENGTH
; (LENGTH STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; processing (DEFUN CHAR-LENGTH ...)
; file: /usr/share/common-lisp/source/cl-flexi-streams/strings.lisp
; in: DEFUN CHAR-LENGTH
; (LENGTH SEQUENCE)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/strings-tmpPAAFO6LP.fasl
; compilation finished in 0:00:00.088
; compiling file "/usr/share/common-lisp/source/bordeaux-threads/src/pkgdcl.lisp" (written 07 JUN 2020 09:11:43 PM):
; processing (DEFPACKAGE :BORDEAUX-THREADS ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/bordeaux-threads/src/pkgdcl-tmp4PCSVQUR.fasl
; compilation finished in 0:00:00.004
; compiling file "/usr/share/common-lisp/source/bordeaux-threads/src/bordeaux-threads.lisp" (written 07 JUN 2020 09:11:43 PM):
; processing (IN-PACKAGE #:BORDEAUX-THREADS)
; processing (DEFVAR *SUPPORTS-THREADS-P* ...)
; processing (DEFUN MARK-SUPPORTED ...)
; processing (DEFINE-CONDITION BORDEAUX-MP-CONDITION ...)
; processing (DEFGENERIC MAKE-THREADING-SUPPORT-ERROR ...)
; processing (DEFSTRUCT %SEMAPHORE ...)
; processing (DEFVAR *DEFAULT-SPECIAL-BINDINGS* ...)
; processing (DEFMACRO DEFBINDINGS ...)
; processing (DEFBINDINGS *STANDARD-IO-BINDINGS* ...)
; processing (DEFUN BINDING-DEFAULT-SPECIALS ...)
; processing (DEFUN SIGNAL-ERROR-IF-CURRENT-THREAD ...)
; processing (DEFPARAMETER *NO-CONDITION-WAIT-TIMEOUT-MESSAGE* ...)
; processing (DEFUN SIGNAL-ERROR-IF-CONDITION-WAIT-TIMEOUT ...)
; processing (DEFMACRO DEFINE-CONDITION-WAIT-COMPILER-MACRO ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/bordeaux-threads/src/bordeaux-threads-tmpCUMSDKM4.fasl
; compilation finished in 0:00:00.148
; compiling file "/usr/share/common-lisp/source/bordeaux-threads/src/impl-null.lisp" (written 07 JUN 2020 09:11:43 PM):
; processing (IN-PACKAGE #:BORDEAUX-THREADS)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/bordeaux-threads/src/impl-null-tmpVBY1FQ3S.fasl
; compilation finished in 0:00:00.004
; compiling file "/usr/share/common-lisp/source/bordeaux-threads/src/default-implementations.lisp" (written 07 JUN 2020 09:11:43 PM):
; processing (IN-PACKAGE #:BORDEAUX-THREADS)
; processing (DEFMACRO DEFDFUN ...)
; processing (DEFMACRO DEFDMACRO ...)
; processing (DEFDFUN START-MULTIPROCESSING ...)
; processing (DEFDFUN MAKE-THREAD ...)
; processing (DEFDFUN %MAKE-THREAD ...)
; processing (DEFDFUN CURRENT-THREAD ...)
; processing (DEFDFUN THREADP ...)
; processing (DEFDFUN THREAD-NAME ...)
; processing (DEFDFUN LOCK-P ...)
; processing (DEFDFUN RECURSIVE-LOCK-P ...)
; processing (DEFDFUN MAKE-LOCK ...)
; processing (DEFDFUN ACQUIRE-LOCK ...)
; processing (DEFDFUN RELEASE-LOCK ...)
; processing (DEFDMACRO WITH-LOCK-HELD ...)
; processing (DEFDFUN MAKE-RECURSIVE-LOCK ...)
; processing (DEFDFUN ACQUIRE-RECURSIVE-LOCK ...)
; processing (DEFDFUN RELEASE-RECURSIVE-LOCK ...)
; processing (DEFDMACRO WITH-RECURSIVE-LOCK-HELD ...)
; processing (DEFDFUN THREAD-YIELD ...)
; processing (DEFDFUN MAKE-CONDITION-VARIABLE ...)
; processing (DEFDFUN CONDITION-WAIT ...)
; processing (DEFDFUN CONDITION-NOTIFY ...)
; processing (DEFDFUN MAKE-SEMAPHORE ...)
; processing (DEFDFUN SIGNAL-SEMAPHORE ...)
; processing (DEFDFUN WAIT-ON-SEMAPHORE ...)
; processing (DEFDFUN SEMAPHORE-P ...)
; file: /usr/share/common-lisp/source/bordeaux-threads/src/default-implementations.lisp
; in: DEFDFUN SEMAPHORE-P
; 'BORDEAUX-THREADS:SEMAPHORE
;
; note: can't open-code test of unknown type SEMAPHORE
; processing (DEFDFUN ALL-THREADS ...)
; processing (DEFDFUN INTERRUPT-THREAD ...)
; processing (DEFDFUN DESTROY-THREAD ...)
; processing (DEFDFUN THREAD-ALIVE-P ...)
; processing (DEFDFUN JOIN-THREAD ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/bordeaux-threads/src/default-implementations-tmpS8NUOPMQ.fasl
; compilation finished in 0:00:00.536
; compiling file "/usr/share/common-lisp/source/trivial-garbage/trivial-garbage.lisp" (written 01 AUG 2020 12:06:58 AM):
; processing (DEFPACKAGE #:TRIVIAL-GARBAGE ...)
; processing (IN-PACKAGE #:TRIVIAL-GARBAGE)
; processing (DEFUN GC ...)
; processing (DEFUN MAKE-WEAK-POINTER ...)
; processing (DEFUN WEAK-POINTER-P ...)
; processing (DEFUN WEAK-POINTER-VALUE ...)
; processing (DEFUN WEAKNESS-KEYWORD-ARG ...)
; processing (DEFVAR *WEAKNESS-WARNINGS* ...)
; processing (DEFUN WEAKNESS-MISSING ...)
; processing (DEFUN WEAKNESS-KEYWORD-OPT ...)
; processing (DEFUN MAKE-WEAK-HASH-TABLE ...)
; processing (DEFUN MAKE-HASH-TABLE ...)
; processing (DEFUN HASH-TABLE-WEAKNESS ...)
; processing (DEFUN FINALIZE ...)
; processing (DEFUN CANCEL-FINALIZATION ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/trivial-garbage/trivial-garbage-tmpPYED056U.fasl
; compilation finished in 0:00:00.092
; compiling file "/usr/share/common-lisp/source/cl+ssl/src/package.lisp" (written 09 JUN 2020 04:49:50 PM):
; processing (IN-PACKAGE :CL-USER)
; processing (DEFPACKAGE :CL+SSL ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl+ssl/src/package-tmpUOCPY155.fasl
; compilation finished in 0:00:00.008
; compiling file "/usr/share/common-lisp/source/cl+ssl/src/reload.lisp" (written 09 JUN 2020 04:49:50 PM):
; processing (IN-PACKAGE :CL+SSL)
; processing (CFFI:DEFINE-FOREIGN-LIBRARY LIBCRYPTO ...)
; processing (CFFI:DEFINE-FOREIGN-LIBRARY LIBSSL ...)
; processing (UNLESS (MEMBER :CL+SSL-FOREIGN-LIBS-ALREADY-LOADED ...) ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl+ssl/src/reload-tmpP4BCARWB.fasl
; compilation finished in 0:00:00.008
; compiling file "/usr/share/common-lisp/source/cl+ssl/src/conditions.lisp" (written 09 JUN 2020 04:49:50 PM):
; processing (IN-PACKAGE :CL+SSL)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...)
; processing (DEFUN READ-SSL-ERROR-QUEUE ...)
; processing (DEFUN FORMAT-SSL-ERROR-QUEUE ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/conditions.lisp
; in: DEFUN FORMAT-SSL-ERROR-QUEUE
; (ETYPECASE CL+SSL::QUEUE-DESIGNATOR
; (CL+SSL::SSL-ERROR (CL+SSL::SSL-ERROR-QUEUE CL+SSL::QUEUE-DESIGNATOR))
; (LIST CL+SSL::QUEUE-DESIGNATOR))
; --> COND IF
; ==>
; (TYPEP #:G1 'CL+SSL::SSL-ERROR)
;
; note: can't open-code test of unknown type SSL-ERROR
; processing (DEFINE-CONDITION CL+SSL-ERROR ...)
; processing (DEFINE-CONDITION SSL-ERROR ...)
; processing (DEFINE-CONDITION SSL-ERROR/HANDLE ...)
; processing (DEFINE-CONDITION SSL-ERROR-INITIALIZE ...)
; processing (DEFINE-CONDITION SSL-ERROR-WANT-SOMETHING ...)
; processing (DEFINE-CONDITION SSL-ERROR-NONE ...)
; processing (DEFINE-CONDITION SSL-ERROR-ZERO-RETURN ...)
; processing (DEFINE-CONDITION SSL-ERROR-WANT-READ ...)
; processing (DEFINE-CONDITION SSL-ERROR-WANT-WRITE ...)
; processing (DEFINE-CONDITION SSL-ERROR-WANT-CONNECT ...)
; processing (DEFINE-CONDITION SSL-ERROR-WANT-X509-LOOKUP ...)
; processing (DEFINE-CONDITION SSL-ERROR-SYSCALL ...)
; processing (DEFINE-CONDITION SSL-ERROR-SSL ...)
; processing (DEFUN SSL-SIGNAL-ERROR ...)
; processing (DEFPARAMETER *SSL-VERIFY-ERROR-ALIST* ...)
; processing (DEFUN SSL-VERIFY-ERROR-KEYWORD ...)
; processing (DEFUN SSL-VERIFY-ERROR-CODE ...)
; processing (DEFINE-CONDITION SSL-ERROR-VERIFY ...)
; processing (DEFINE-CONDITION SSL-ERROR-CALL ...)
; processing (DEFINE-CONDITION ASN1-ERROR ...)
; processing (DEFINE-CONDITION INVALID-ASN1-STRING ...)
; processing (DEFINE-CONDITION SERVER-CERTIFICATE-MISSING ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl+ssl/src/conditions-tmpOUEHOD9C.fasl
; compilation finished in 0:00:00.264
; compiling file "/usr/share/common-lisp/source/cl+ssl/src/ffi.lisp" (written 09 JUN 2020 04:49:50 PM):
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL) ...)
; processing (IN-PACKAGE :CL+SSL)
; processing (DEFPARAMETER *LATE-BOUND-FOREIGN-FUNCTION-POINTERS* ...)
; processing (DEFMACRO DEFCFUN-LATE-BOUND ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFMACRO DEFCFUN-LATE-BOUND
; (LENGTH CL+SSL::NAME-AND-OPTIONS)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; processing (DEFMACRO DEFCFUN-VERSIONED ...)
; processing (DEFVAR *CL+SSL-SSL-FOREIGN-FUNCTION-NAMES* ...)
; processing (DEFVAR *CL+SSL-CRYPTO-FOREIGN-FUNCTION-NAMES* ...)
; processing (DEFMACRO DEFINE-SSL-FUNCTION-EX ...)
; processing (DEFMACRO DEFINE-SSL-FUNCTION ...)
; processing (DEFMACRO DEFINE-CRYPTO-FUNCTION-EX ...)
; processing (DEFMACRO DEFINE-CRYPTO-FUNCTION ...)
; processing (DEFVAR *SSL-GLOBAL-CONTEXT* ...)
; processing (DEFVAR *SSL-GLOBAL-METHOD* ...)
; processing (DEFVAR *BIO-LISP-METHOD* ...)
; processing (DEFPARAMETER *BLOCKP* ...)
; processing (DEFPARAMETER *PARTIAL-READ-P* ...)
; processing (DEFUN SSL-INITIALIZED-P ...)
; processing (DEFCONSTANT +SSL-FILETYPE-PEM+ ...)
; processing (DEFCONSTANT +SSL-FILETYPE-ASN1+ ...)
; processing (DEFCONSTANT +SSL-FILETYPE-DEFAULT+ ...)
; processing (DEFCONSTANT +SSL-CTRL-OPTIONS+ ...)
; processing (DEFCONSTANT +SSL_CTRL_SET_SESS_CACHE_MODE+ ...)
; processing (DEFCONSTANT +SSL_CTRL_MODE+ ...)
; processing (DEFCONSTANT +SSL_MODE_ACCEPT_MOVING_WRITE_BUFFER+ ...)
; processing (DEFCONSTANT +RSA_F4+ ...)
; processing (DEFCONSTANT +SSL-SESS-CACHE-OFF+ ...)
; processing (DEFCONSTANT +SSL-SESS-CACHE-CLIENT+ ...)
; processing (DEFCONSTANT +SSL-SESS-CACHE-SERVER+ ...)
; processing (DEFCONSTANT +SSL-SESS-CACHE-BOTH+ ...)
; processing (DEFCONSTANT +SSL-SESS-CACHE-NO-AUTO-CLEAR+ ...)
; processing (DEFCONSTANT +SSL-SESS-CACHE-NO-INTERNAL-LOOKUP+ ...)
; processing (DEFCONSTANT +SSL-SESS-CACHE-NO-INTERNAL-STORE+ ...)
; processing (DEFCONSTANT +SSL-SESS-CACHE-NO-INTERNAL+ ...)
; processing (DEFCONSTANT +SSL-VERIFY-NONE+ ...)
; processing (DEFCONSTANT +SSL-VERIFY-PEER+ ...)
; processing (DEFCONSTANT +SSL-VERIFY-FAIL-IF-NO-PEER-CERT+ ...)
; processing (DEFCONSTANT +SSL-VERIFY-CLIENT-ONCE+ ...)
; processing (DEFCONSTANT +SSL-OP-ALL+ ...)
; processing (DEFCONSTANT +SSL-OP-NO-SSLV2+ ...)
; processing (DEFCONSTANT +SSL-OP-NO-SSLV3+ ...)
; processing (DEFCONSTANT +SSL-OP-NO-TLSV1+ ...)
; processing (DEFCONSTANT +SSL-OP-NO-TLSV1-2+ ...)
; processing (DEFCONSTANT +SSL-OP-NO-TLSV1-1+ ...)
; processing (DEFVAR *TMP-RSA-KEY-512* ...)
; processing (DEFVAR *TMP-RSA-KEY-1024* ...)
; processing (DEFVAR *TMP-RSA-KEY-2048* ...)
; processing (DEFMACRO WHILE ...)
; processing (CFFI:DEFCFUN ("close" CLOSE-SOCKET) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: CFFI:DEFCFUN ("close" CLOSE-SOCKET)
; (CFFI:DEFCFUN ("close" CL+SSL::CLOSE-SOCKET)
; :INT
; (CL+SSL::SOCKET :INT))
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::CLOSE-SOCKET
; (CL+SSL::SOCKET)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::CLOSE-SOCKET
; (LET ((#:G0 CL+SSL::SOCKET))
; (CFFI-SYS:%FOREIGN-FUNCALL "close" (:INT #:G0 :INT) :CONVENTION
; :CDECL :LIBRARY :DEFAULT))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DECLAIM (INLINE SSL-WRITE ...))
; processing (CFFI:DEFCTYPE SSL-METHOD ...)
; processing (CFFI:DEFCTYPE SSL-CTX ...)
; processing (CFFI:DEFCTYPE SSL-POINTER ...)
; processing (DEFINE-CRYPTO-FUNCTION-EX (:VANISHED "1.1.0") ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-CRYPTO-FUNCTION-EX (:VANISHED "1.1.0")
; (CL+SSL::DEFINE-CRYPTO-FUNCTION-EX
; (:VANISHED "1.1.0")
; ("SSLeay" CL+SSL::SSL-EAY)
; :LONG)
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-EAY
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-EAY
; (CFFI-SYS:%FOREIGN-FUNCALL "SSLeay" (:LONG) :CONVENTION :CDECL :LIBRARY
; :DEFAULT)))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-CRYPTO-FUNCTION-EX (:SINCE "1.1.0") ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-CRYPTO-FUNCTION-EX (:SINCE "1.1.0")
; (CL+SSL::DEFINE-CRYPTO-FUNCTION-EX
; (:SINCE "1.1.0")
; ("OpenSSL_version_num" CL+SSL::OPENSSL-VERSION-NUM)
; :LONG)
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::OPENSSL-VERSION-NUM
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::OPENSSL-VERSION-NUM
; (CFFI-SYS:%FOREIGN-FUNCALL "OpenSSL_version_num" (:LONG) :CONVENTION
; :CDECL :LIBRARY :DEFAULT)))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFUN COMPAT-OPENSSL-VERSION ...)
; processing (DEFUN ENCODE-OPENSSL-VERSION ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFUN ENCODE-OPENSSL-VERSION
; (DEFUN CL+SSL::ENCODE-OPENSSL-VERSION
; (CL+SSL::MAJOR CL+SSL::MINOR
; &OPTIONAL (CL+SSL::PATCH 0) (CL+SSL::PRERELEASE))
; "Builds a version number to compare OpenSSL against.
; Note: the _really_ old formats (<= 0.9.4) are not supported."
; (DECLARE (TYPE (INTEGER 0 3) CL+SSL::MAJOR)
; (TYPE (INTEGER 0 10) CL+SSL::MINOR)
; (TYPE (INTEGER 0 20) CL+SSL::PATCH))
; (LOGIOR (ASH CL+SSL::MAJOR 28) (ASH CL+SSL::MINOR 20) (ASH CL+SSL::PATCH 4)
; (IF CL+SSL::PRERELEASE
; 15
; 0)))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::ENCODE-OPENSSL-VERSION
; (CL+SSL::MAJOR CL+SSL::MINOR &OPTIONAL (CL+SSL::PATCH 0)
; (CL+SSL::PRERELEASE))
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; "Builds a version number to compare OpenSSL against.
; Note: the _really_ old formats (<= 0.9.4) are not supported."
; (DECLARE (TYPE (INTEGER 0 3) CL+SSL::MAJOR)
; (TYPE (INTEGER 0 10) CL+SSL::MINOR)
; (TYPE (INTEGER 0 20) CL+SSL::PATCH))
; (BLOCK CL+SSL::ENCODE-OPENSSL-VERSION
; (LOGIOR (ASH CL+SSL::MAJOR 28) (ASH CL+SSL::MINOR 20)
; (ASH CL+SSL::PATCH 4)
; (IF CL+SSL::PRERELEASE
; 15
; 0))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFUN OPENSSL-IS-AT-LEAST ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFUN OPENSSL-IS-AT-LEAST
; (>= (CL+SSL::COMPAT-OPENSSL-VERSION)
; (CL+SSL::ENCODE-OPENSSL-VERSION CL+SSL::MAJOR CL+SSL::MINOR CL+SSL::PATCH
; CL+SSL::PRERELEASE))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (DOUBLE-FLOAT * 8.15792463d8)
; (SINGLE-FLOAT * 8.1579245e8)
; (RATIONAL * 815792463)), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a (MOD 815792464), not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 32).
; etc.
; processing (DEFUN OPENSSL-IS-NOT-EVEN ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFUN OPENSSL-IS-NOT-EVEN
; (< (CL+SSL::COMPAT-OPENSSL-VERSION)
; (CL+SSL::ENCODE-OPENSSL-VERSION CL+SSL::MAJOR CL+SSL::MINOR CL+SSL::PATCH
; CL+SSL::PRERELEASE))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a (MOD 815792464), not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 32).
; etc.
; processing (DEFUN LIBRESSLP ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFUN LIBRESSLP
; (= 536870912 (CL+SSL::COMPAT-OPENSSL-VERSION))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
; processing (DEFINE-SSL-FUNCTION ("SSL_get_version" SSL-GET-VERSION) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION ("SSL_get_version" SSL-GET-VERSION)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_get_version" CL+SSL::SSL-GET-VERSION)
; :STRING
; (CL+SSL::SSL CL+SSL::SSL-POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN
; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_get_version" (:POINTER #:G0 :POINTER)
; :CONVENTION :CDECL :LIBRARY CL+SSL::LIBSSL)
; #<CFFI::FOREIGN-STRING-TYPE :UTF-8>)
;
; note: doing SAP to pointer coercion (cost 20)
; processing (DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0") ...)
; processing (DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0") ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0")
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:VANISHED "1.1.0")
; ("SSL_library_init" CL+SSL::SSL-LIBRARY-INIT)
; :INT)
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-LIBRARY-INIT
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-LIBRARY-INIT
; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_library_init" (:INT) :CONVENTION :CDECL
; :LIBRARY CL+SSL::LIBSSL)))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0") ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0")
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:VANISHED "1.1.0")
; ("SSLv23_client_method" CL+SSL::SSL-V23-CLIENT-METHOD)
; CL+SSL::SSL-METHOD)
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-V23-CLIENT-METHOD
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-V23-CLIENT-METHOD
; (CFFI-SYS:%FOREIGN-FUNCALL "SSLv23_client_method" (:POINTER)
; :CONVENTION :CDECL :LIBRARY CL+SSL::LIBSSL)))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0") ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0")
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:VANISHED "1.1.0")
; ("SSLv23_server_method" CL+SSL::SSL-V23-SERVER-METHOD)
; CL+SSL::SSL-METHOD)
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-V23-SERVER-METHOD
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-V23-SERVER-METHOD
; (CFFI-SYS:%FOREIGN-FUNCALL "SSLv23_server_method" (:POINTER)
; :CONVENTION :CDECL :LIBRARY CL+SSL::LIBSSL)))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0") ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0")
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:VANISHED "1.1.0")
; ("SSLv23_method" CL+SSL::SSL-V23-METHOD)
; CL+SSL::SSL-METHOD)
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-V23-METHOD
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-V23-METHOD
; (CFFI-SYS:%FOREIGN-FUNCALL "SSLv23_method" (:POINTER) :CONVENTION
; :CDECL :LIBRARY CL+SSL::LIBSSL)))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0") ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0")
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:VANISHED "1.1.0")
; ("SSLv3_client_method" CL+SSL::SSL-V3-CLIENT-METHOD)
; CL+SSL::SSL-METHOD)
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-V3-CLIENT-METHOD
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-V3-CLIENT-METHOD
; (CFFI-SYS:%FOREIGN-FUNCALL "SSLv3_client_method" (:POINTER) :CONVENTION
; :CDECL :LIBRARY CL+SSL::LIBSSL)))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0") ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0")
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:VANISHED "1.1.0")
; ("SSLv3_server_method" CL+SSL::SSL-V3-SERVER-METHOD)
; CL+SSL::SSL-METHOD)
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-V3-SERVER-METHOD
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-V3-SERVER-METHOD
; (CFFI-SYS:%FOREIGN-FUNCALL "SSLv3_server_method" (:POINTER) :CONVENTION
; :CDECL :LIBRARY CL+SSL::LIBSSL)))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0") ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0")
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:VANISHED "1.1.0")
; ("SSLv3_method" CL+SSL::SSL-V3-METHOD)
; CL+SSL::SSL-METHOD)
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-V3-METHOD
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-V3-METHOD
; (CFFI-SYS:%FOREIGN-FUNCALL "SSLv3_method" (:POINTER) :CONVENTION :CDECL
; :LIBRARY CL+SSL::LIBSSL)))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION ("TLSv1_client_method" SSL-TLSV1-CLIENT-METHOD) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION ("TLSv1_client_method" SSL-TLSV1-CLIENT-METHOD)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("TLSv1_client_method" CL+SSL::SSL-TLSV1-CLIENT-METHOD)
; CL+SSL::SSL-METHOD)
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-TLSV1-CLIENT-METHOD
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-TLSV1-CLIENT-METHOD
; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_client_method" (:POINTER) :CONVENTION
; :CDECL :LIBRARY CL+SSL::LIBSSL)))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION ("TLSv1_server_method" SSL-TLSV1-SERVER-METHOD) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION ("TLSv1_server_method" SSL-TLSV1-SERVER-METHOD)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("TLSv1_server_method" CL+SSL::SSL-TLSV1-SERVER-METHOD)
; CL+SSL::SSL-METHOD)
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-TLSV1-SERVER-METHOD
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-TLSV1-SERVER-METHOD
; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_server_method" (:POINTER) :CONVENTION
; :CDECL :LIBRARY CL+SSL::LIBSSL)))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION ("TLSv1_method" SSL-TLSV1-METHOD) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION ("TLSv1_method" SSL-TLSV1-METHOD)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("TLSv1_method" CL+SSL::SSL-TLSV1-METHOD)
; CL+SSL::SSL-METHOD)
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-TLSV1-METHOD
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-TLSV1-METHOD
; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_method" (:POINTER) :CONVENTION :CDECL
; :LIBRARY CL+SSL::LIBSSL)))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION-EX (:SINCE "1.0.2") ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION-EX (:SINCE "1.0.2")
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:SINCE "1.0.2")
; ("TLSv1_1_client_method" CL+SSL::SSL-TLSV1-1-CLIENT-METHOD)
; CL+SSL::SSL-METHOD)
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-TLSV1-1-CLIENT-METHOD
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-TLSV1-1-CLIENT-METHOD
; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_1_client_method" (:POINTER)
; :CONVENTION :CDECL :LIBRARY CL+SSL::LIBSSL)))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION-EX (:SINCE "1.0.2") ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION-EX (:SINCE "1.0.2")
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:SINCE "1.0.2")
; ("TLSv1_1_server_method" CL+SSL::SSL-TLSV1-1-SERVER-METHOD)
; CL+SSL::SSL-METHOD)
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-TLSV1-1-SERVER-METHOD
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-TLSV1-1-SERVER-METHOD
; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_1_server_method" (:POINTER)
; :CONVENTION :CDECL :LIBRARY CL+SSL::LIBSSL)))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION-EX (:SINCE "1.0.2") ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION-EX (:SINCE "1.0.2")
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:SINCE "1.0.2")
; ("TLSv1_1_method" CL+SSL::SSL-TLSV1-1-METHOD)
; CL+SSL::SSL-METHOD)
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-TLSV1-1-METHOD
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-TLSV1-1-METHOD
; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_1_method" (:POINTER) :CONVENTION
; :CDECL :LIBRARY CL+SSL::LIBSSL)))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION-EX (:SINCE "1.0.2") ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION-EX (:SINCE "1.0.2")
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:SINCE "1.0.2")
; ("TLSv1_2_client_method" CL+SSL::SSL-TLSV1-2-CLIENT-METHOD)
; CL+SSL::SSL-METHOD)
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-TLSV1-2-CLIENT-METHOD
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-TLSV1-2-CLIENT-METHOD
; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_2_client_method" (:POINTER)
; :CONVENTION :CDECL :LIBRARY CL+SSL::LIBSSL)))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION-EX (:SINCE "1.0.2") ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION-EX (:SINCE "1.0.2")
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:SINCE "1.0.2")
; ("TLSv1_2_server_method" CL+SSL::SSL-TLSV1-2-SERVER-METHOD)
; CL+SSL::SSL-METHOD)
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-TLSV1-2-SERVER-METHOD
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-TLSV1-2-SERVER-METHOD
; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_2_server_method" (:POINTER)
; :CONVENTION :CDECL :LIBRARY CL+SSL::LIBSSL)))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION-EX (:SINCE "1.0.2") ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION-EX (:SINCE "1.0.2")
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:SINCE "1.0.2")
; ("TLSv1_2_method" CL+SSL::SSL-TLSV1-2-METHOD)
; CL+SSL::SSL-METHOD)
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-TLSV1-2-METHOD
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-TLSV1-2-METHOD
; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_2_method" (:POINTER) :CONVENTION
; :CDECL :LIBRARY CL+SSL::LIBSSL)))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION-EX (:SINCE "1.1.0") ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION-EX (:SINCE "1.1.0")
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:SINCE "1.1.0")
; ("TLS_method" CL+SSL::TLS-METHOD)
; CL+SSL::SSL-METHOD)
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::TLS-METHOD
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::TLS-METHOD
; (CFFI-SYS:%FOREIGN-FUNCALL "TLS_method" (:POINTER) :CONVENTION :CDECL
; :LIBRARY CL+SSL::LIBSSL)))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION ("SSL_CTX_new" SSL-CTX-NEW) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION ("SSL_CTX_new" SSL-CTX-NEW)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_CTX_new" CL+SSL::SSL-CTX-NEW)
; CL+SSL::SSL-CTX
; (METHOD CL+SSL::SSL-METHOD))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-CTX-NEW
; (METHOD)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-CTX-NEW
; (LET ((#:G0 METHOD))
; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_CTX_new" (:POINTER #:G0 :POINTER)
; :CONVENTION :CDECL :LIBRARY
; CL+SSL::LIBSSL))))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION ("SSL_new" SSL-NEW) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION ("SSL_new" SSL-NEW)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_new" CL+SSL::SSL-NEW)
; CL+SSL::SSL-POINTER
; (CL+SSL::CTX CL+SSL::SSL-CTX))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-NEW
; (CL+SSL::CTX)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-NEW
; (LET ((#:G0 CL+SSL::CTX))
; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_new" (:POINTER #:G0 :POINTER)
; :CONVENTION :CDECL :LIBRARY
; CL+SSL::LIBSSL))))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION ("SSL_get_fd" SSL-GET-FD) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION ("SSL_get_fd" SSL-GET-FD)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_get_fd" CL+SSL::SSL-GET-FD)
; :INT
; (CL+SSL::SSL CL+SSL::SSL-POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-GET-FD
; (CL+SSL::SSL)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-GET-FD
; (LET ((#:G0 CL+SSL::SSL))
; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_get_fd" (:POINTER #:G0 :INT)
; :CONVENTION :CDECL :LIBRARY
; CL+SSL::LIBSSL))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION ("SSL_set_fd" SSL-SET-FD) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION ("SSL_set_fd" SSL-SET-FD)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_set_fd" CL+SSL::SSL-SET-FD)
; :INT
; (CL+SSL::SSL CL+SSL::SSL-POINTER)
; (CL+SSL::FD :INT))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-SET-FD
; (CL+SSL::SSL CL+SSL::FD)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-SET-FD
; (LET ((#:G0 CL+SSL::SSL))
; (LET (#)
; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_set_fd" # :CONVENTION :CDECL
; :LIBRARY CL+SSL::LIBSSL)))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION ("SSL_set_bio" SSL-SET-BIO) ...)
; processing (DEFINE-SSL-FUNCTION ("SSL_get_error" SSL-GET-ERROR) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION ("SSL_get_error" SSL-GET-ERROR)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_get_error" CL+SSL::SSL-GET-ERROR)
; :INT
; (CL+SSL::SSL CL+SSL::SSL-POINTER)
; (CL+SSL::RET :INT))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-GET-ERROR
; (CL+SSL::SSL CL+SSL::RET)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-GET-ERROR
; (LET ((#:G0 CL+SSL::SSL))
; (LET (#)
; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_get_error" # :CONVENTION :CDECL
; :LIBRARY CL+SSL::LIBSSL)))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION ("SSL_set_connect_state" SSL-SET-CONNECT-STATE) ...)
; processing (DEFINE-SSL-FUNCTION ("SSL_set_accept_state" SSL-SET-ACCEPT-STATE) ...)
; processing (DEFINE-SSL-FUNCTION ("SSL_connect" SSL-CONNECT) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION ("SSL_connect" SSL-CONNECT)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_connect" CL+SSL::SSL-CONNECT)
; :INT
; (CL+SSL::SSL CL+SSL::SSL-POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-CONNECT
; (CL+SSL::SSL)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-CONNECT
; (LET ((#:G0 CL+SSL::SSL))
; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_connect" (:POINTER #:G0 :INT)
; :CONVENTION :CDECL :LIBRARY
; CL+SSL::LIBSSL))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION ("SSL_accept" SSL-ACCEPT) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION ("SSL_accept" SSL-ACCEPT)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_accept" CL+SSL::SSL-ACCEPT)
; :INT
; (CL+SSL::SSL CL+SSL::SSL-POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-ACCEPT
; (CL+SSL::SSL)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-ACCEPT
; (LET ((#:G0 CL+SSL::SSL))
; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_accept" (:POINTER #:G0 :INT)
; :CONVENTION :CDECL :LIBRARY
; CL+SSL::LIBSSL))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION ("SSL_write" SSL-WRITE) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION ("SSL_write" SSL-WRITE)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_write" CL+SSL::SSL-WRITE)
; :INT
; (CL+SSL::SSL CL+SSL::SSL-POINTER)
; (CL+SSL::BUF :POINTER)
; (CL+SSL::NUM :INT))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-WRITE
; (CL+SSL::SSL CL+SSL::BUF CL+SSL::NUM)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-WRITE
; (LET ((#:G0 CL+SSL::SSL))
; (LET (#)
; (LET #
; #)))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION ("SSL_read" SSL-READ) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION ("SSL_read" SSL-READ)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_read" CL+SSL::SSL-READ)
; :INT
; (CL+SSL::SSL CL+SSL::SSL-POINTER)
; (CL+SSL::BUF :POINTER)
; (CL+SSL::NUM :INT))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-READ
; (CL+SSL::SSL CL+SSL::BUF CL+SSL::NUM)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-READ
; (LET ((#:G0 CL+SSL::SSL))
; (LET (#)
; (LET #
; #)))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION ("SSL_shutdown" SSL-SHUTDOWN) ...)
; processing (DEFINE-SSL-FUNCTION ("SSL_free" SSL-FREE) ...)
; processing (DEFINE-SSL-FUNCTION ("SSL_CTX_free" SSL-CTX-FREE) ...)
; processing (DEFINE-CRYPTO-FUNCTION ("BIO_ctrl" BIO-SET-FD) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-CRYPTO-FUNCTION ("BIO_ctrl" BIO-SET-FD)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("BIO_ctrl" CL+SSL::BIO-SET-FD)
; :LONG
; (CL+SSL::BIO :POINTER)
; (CL+SSL::CMD :INT)
; (CL+SSL::LARG :LONG)
; (CL+SSL::PARG :POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::BIO-SET-FD
; (CL+SSL::BIO CL+SSL::CMD CL+SSL::LARG CL+SSL::PARG)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::BIO-SET-FD
; (LET ((#:G0 CL+SSL::BIO))
; (LET (#)
; (LET #
; #)))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-CRYPTO-FUNCTION ("BIO_new_socket" BIO-NEW-SOCKET) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-CRYPTO-FUNCTION ("BIO_new_socket" BIO-NEW-SOCKET)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("BIO_new_socket" CL+SSL::BIO-NEW-SOCKET)
; :POINTER
; (CL+SSL::FD :INT)
; (CL+SSL::CLOSE-FLAG :INT))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::BIO-NEW-SOCKET
; (CL+SSL::FD CL+SSL::CLOSE-FLAG)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::BIO-NEW-SOCKET
; (LET ((#:G0 CL+SSL::FD))
; (LET (#)
; (CFFI-SYS:%FOREIGN-FUNCALL "BIO_new_socket" # :CONVENTION :CDECL
; :LIBRARY :DEFAULT)))))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-CRYPTO-FUNCTION ("BIO_new" BIO-NEW) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-CRYPTO-FUNCTION ("BIO_new" BIO-NEW)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("BIO_new" CL+SSL::BIO-NEW)
; :POINTER
; (METHOD :POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::BIO-NEW
; (METHOD)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::BIO-NEW
; (LET ((#:G0 METHOD))
; (CFFI-SYS:%FOREIGN-FUNCALL "BIO_new" (:POINTER #:G0 :POINTER)
; :CONVENTION :CDECL :LIBRARY :DEFAULT))))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-CRYPTO-FUNCTION ("ERR_get_error" ERR-GET-ERROR) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-CRYPTO-FUNCTION ("ERR_get_error" ERR-GET-ERROR)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("ERR_get_error" CL+SSL::ERR-GET-ERROR)
; :UNSIGNED-LONG)
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::ERR-GET-ERROR
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::ERR-GET-ERROR
; (CFFI-SYS:%FOREIGN-FUNCALL "ERR_get_error" (:UNSIGNED-LONG) :CONVENTION
; :CDECL :LIBRARY :DEFAULT)))
;
; note: doing unsigned word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-CRYPTO-FUNCTION ("ERR_error_string" ERR-ERROR-STRING) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-CRYPTO-FUNCTION ("ERR_error_string" ERR-ERROR-STRING)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("ERR_error_string" CL+SSL::ERR-ERROR-STRING)
; :STRING
; (CL+SSL::E :UNSIGNED-LONG)
; (CL+SSL::BUF :POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK LET
; --> LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN
; (CFFI-SYS:%FOREIGN-FUNCALL "ERR_error_string"
; (:UNSIGNED-LONG #:G0 :POINTER #:G1 :POINTER)
; :CONVENTION :CDECL :LIBRARY :DEFAULT)
; #<CFFI::FOREIGN-STRING-TYPE :UTF-8>)
;
; note: doing SAP to pointer coercion (cost 20)
; processing (DEFINE-SSL-FUNCTION ("SSL_set_cipher_list" SSL-SET-CIPHER-LIST) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION ("SSL_set_cipher_list" SSL-SET-CIPHER-LIST)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_set_cipher_list" CL+SSL::SSL-SET-CIPHER-LIST)
; :INT
; (CL+SSL::SSL CL+SSL::SSL-POINTER)
; (CL+SSL::STR :STRING))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-SET-CIPHER-LIST
; (CL+SSL::SSL CL+SSL::STR)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-SET-CIPHER-LIST
; (LET ((#:G0 CL+SSL::SSL))
; (MULTIPLE-VALUE-BIND (#:G1 #:PARAM2)
; (CFFI:TRANSLATE-TO-FOREIGN CL+SSL::STR #)
; (UNWIND-PROTECT # #)))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION ("SSL_use_RSAPrivateKey_file" SSL-USE-RSA-PRIVATEKEY-FILE) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in:
; DEFINE-SSL-FUNCTION ("SSL_use_RSAPrivateKey_file" SSL-USE-RSA-PRIVATEKEY-FILE)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_use_RSAPrivateKey_file" CL+SSL::SSL-USE-RSA-PRIVATEKEY-FILE)
; :INT
; (CL+SSL::SSL CL+SSL::SSL-POINTER)
; (CL+SSL::STR :STRING)
; (TYPE :INT))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-USE-RSA-PRIVATEKEY-FILE
; (CL+SSL::SSL CL+SSL::STR TYPE)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-USE-RSA-PRIVATEKEY-FILE
; (LET ((#:G0 CL+SSL::SSL))
; (MULTIPLE-VALUE-BIND (#:G1 #:PARAM3)
; (CFFI:TRANSLATE-TO-FOREIGN CL+SSL::STR #)
; (UNWIND-PROTECT # #)))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION ("SSL_CTX_use_RSAPrivateKey_file" SSL-CTX-USE-RSA-PRIVATEKEY-FILE) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in:
; DEFINE-SSL-FUNCTION ("SSL_CTX_use_RSAPrivateKey_file"
; SSL-CTX-USE-RSA-PRIVATEKEY-FILE)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_CTX_use_RSAPrivateKey_file" CL+SSL::SSL-CTX-USE-RSA-PRIVATEKEY-FILE)
; :INT
; (CL+SSL::CTX CL+SSL::SSL-CTX)
; (TYPE :INT))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-CTX-USE-RSA-PRIVATEKEY-FILE
; (CL+SSL::CTX TYPE)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-CTX-USE-RSA-PRIVATEKEY-FILE
; (LET ((#:G0 CL+SSL::CTX))
; (LET (#)
; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_CTX_use_RSAPrivateKey_file" #
; :CONVENTION :CDECL :LIBRARY
; CL+SSL::LIBSSL)))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION ("SSL_use_PrivateKey_file" SSL-USE-PRIVATEKEY-FILE) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in:
; DEFINE-SSL-FUNCTION ("SSL_use_PrivateKey_file" SSL-USE-PRIVATEKEY-FILE)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_use_PrivateKey_file" CL+SSL::SSL-USE-PRIVATEKEY-FILE)
; :INT
; (CL+SSL::SSL CL+SSL::SSL-POINTER)
; (CL+SSL::STR :STRING)
; (TYPE :INT))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-USE-PRIVATEKEY-FILE
; (CL+SSL::SSL CL+SSL::STR TYPE)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-USE-PRIVATEKEY-FILE
; (LET ((#:G0 CL+SSL::SSL))
; (MULTIPLE-VALUE-BIND (#:G1 #:PARAM3)
; (CFFI:TRANSLATE-TO-FOREIGN CL+SSL::STR #)
; (UNWIND-PROTECT # #)))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION ("SSL_CTX_use_PrivateKey_file" SSL-CTX-USE-PRIVATEKEY-FILE) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in:
; DEFINE-SSL-FUNCTION ("SSL_CTX_use_PrivateKey_file" SSL-CTX-USE-PRIVATEKEY-FILE)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_CTX_use_PrivateKey_file" CL+SSL::SSL-CTX-USE-PRIVATEKEY-FILE)
; :INT
; (CL+SSL::CTX CL+SSL::SSL-CTX)
; (TYPE :INT))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-CTX-USE-PRIVATEKEY-FILE
; (CL+SSL::CTX TYPE)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-CTX-USE-PRIVATEKEY-FILE
; (LET ((#:G0 CL+SSL::CTX))
; (LET (#)
; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_CTX_use_PrivateKey_file" #
; :CONVENTION :CDECL :LIBRARY
; CL+SSL::LIBSSL)))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION ("SSL_use_certificate_file" SSL-USE-CERTIFICATE-FILE) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in:
; DEFINE-SSL-FUNCTION ("SSL_use_certificate_file" SSL-USE-CERTIFICATE-FILE)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_use_certificate_file" CL+SSL::SSL-USE-CERTIFICATE-FILE)
; :INT
; (CL+SSL::SSL CL+SSL::SSL-POINTER)
; (CL+SSL::STR :STRING)
; (TYPE :INT))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-USE-CERTIFICATE-FILE
; (CL+SSL::SSL CL+SSL::STR TYPE)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-USE-CERTIFICATE-FILE
; (LET ((#:G0 CL+SSL::SSL))
; (MULTIPLE-VALUE-BIND (#:G1 #:PARAM3)
; (CFFI:TRANSLATE-TO-FOREIGN CL+SSL::STR #)
; (UNWIND-PROTECT # #)))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFUN SSL-CTX-SET-OPTIONS ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFUN SSL-CTX-SET-OPTIONS
; (CL+SSL::SSL-CTX-CTRL CL+SSL::CTX CL+SSL::+SSL-CTRL-OPTIONS+ CL+SSL::OPTIONS
; (CFFI-SYS:NULL-POINTER))
;
; note: doing SAP to pointer coercion (cost 20)
; processing (DEFINE-SSL-FUNCTION ("SSL_CTX_set_cipher_list" SSL-CTX-SET-CIPHER-LIST%) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in:
; DEFINE-SSL-FUNCTION ("SSL_CTX_set_cipher_list" SSL-CTX-SET-CIPHER-LIST%)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_CTX_set_cipher_list" CL+SSL::SSL-CTX-SET-CIPHER-LIST%)
; :INT
; (CL+SSL::CTX :POINTER)
; (CL+SSL::CIPHERS :POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-CTX-SET-CIPHER-LIST%
; (CL+SSL::CTX CL+SSL::CIPHERS)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-CTX-SET-CIPHER-LIST%
; (LET ((#:G0 CL+SSL::CTX))
; (LET (#)
; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_CTX_set_cipher_list" # :CONVENTION
; :CDECL :LIBRARY CL+SSL::LIBSSL)))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFUN SSL-CTX-SET-CIPHER-LIST ...)
; processing (DEFINE-SSL-FUNCTION ("SSL_CTX_use_certificate_chain_file" SSL-CTX-USE-CERTIFICATE-CHAIN-FILE) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in:
; DEFINE-SSL-FUNCTION ("SSL_CTX_use_certificate_chain_file"
; SSL-CTX-USE-CERTIFICATE-CHAIN-FILE)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_CTX_use_certificate_chain_file"
; CL+SSL::SSL-CTX-USE-CERTIFICATE-CHAIN-FILE)
; :INT
; (CL+SSL::CTX CL+SSL::SSL-CTX)
; (CL+SSL::STR :STRING))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-CTX-USE-CERTIFICATE-CHAIN-FILE
; (CL+SSL::CTX CL+SSL::STR)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-CTX-USE-CERTIFICATE-CHAIN-FILE
; (LET ((#:G0 CL+SSL::CTX))
; (MULTIPLE-VALUE-BIND (#:G1 #:PARAM2)
; (CFFI:TRANSLATE-TO-FOREIGN CL+SSL::STR #)
; (UNWIND-PROTECT # #)))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION ("SSL_CTX_load_verify_locations" SSL-CTX-LOAD-VERIFY-LOCATIONS) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in:
; DEFINE-SSL-FUNCTION ("SSL_CTX_load_verify_locations"
; SSL-CTX-LOAD-VERIFY-LOCATIONS)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_CTX_load_verify_locations" CL+SSL::SSL-CTX-LOAD-VERIFY-LOCATIONS)
; :INT
; (CL+SSL::CTX CL+SSL::SSL-CTX)
; (CL+SSL::CAFILE :STRING)
; (CL+SSL::CAPATH :STRING))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-CTX-LOAD-VERIFY-LOCATIONS
; (CL+SSL::CTX CL+SSL::CAFILE CL+SSL::CAPATH)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-CTX-LOAD-VERIFY-LOCATIONS
; (LET ((#:G0 CL+SSL::CTX))
; (MULTIPLE-VALUE-BIND (#:G1 #:PARAM4)
; (CFFI:TRANSLATE-TO-FOREIGN CL+SSL::CAFILE #)
; (UNWIND-PROTECT # #)))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION ("SSL_CTX_set_client_CA_list" SSL-CTX-SET-CLIENT-CA-LIST) ...)
; processing (DEFINE-SSL-FUNCTION ("SSL_load_client_CA_file" SSL-LOAD-CLIENT-CA-FILE) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in:
; DEFINE-SSL-FUNCTION ("SSL_load_client_CA_file" SSL-LOAD-CLIENT-CA-FILE)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_load_client_CA_file" CL+SSL::SSL-LOAD-CLIENT-CA-FILE)
; CL+SSL::SSL-POINTER
; (CL+SSL::FILE :STRING))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-LOAD-CLIENT-CA-FILE
; (CL+SSL::FILE)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-LOAD-CLIENT-CA-FILE
; (MULTIPLE-VALUE-BIND (#:G0 #:PARAM1)
; (CFFI:TRANSLATE-TO-FOREIGN CL+SSL::FILE
; #<CFFI::FOREIGN-STRING-TYPE :UTF-8>)
; (UNWIND-PROTECT (PROGN #)
; (CFFI:FREE-TRANSLATED-OBJECT #:G0 # #:PARAM1)))))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION ("SSL_CTX_ctrl" SSL-CTX-CTRL) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION ("SSL_CTX_ctrl" SSL-CTX-CTRL)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_CTX_ctrl" CL+SSL::SSL-CTX-CTRL)
; :LONG
; (CL+SSL::CTX CL+SSL::SSL-CTX)
; (CL+SSL::CMD :INT)
; (CL+SSL::LARG :UNSIGNED-LONG)
; (CL+SSL::PARG :POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-CTX-CTRL
; (CL+SSL::CTX CL+SSL::CMD CL+SSL::LARG CL+SSL::PARG)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-CTX-CTRL
; (LET ((#:G0 CL+SSL::CTX))
; (LET (#)
; (LET #
; #)))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION ("SSL_ctrl" SSL-CTRL) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION ("SSL_ctrl" SSL-CTRL)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_ctrl" CL+SSL::SSL-CTRL)
; :LONG
; (CL+SSL::SSL :POINTER)
; (CL+SSL::CMD :INT)
; (CL+SSL::LARG :LONG)
; (CL+SSL::PARG :POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-CTRL
; (CL+SSL::SSL CL+SSL::CMD CL+SSL::LARG CL+SSL::PARG)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-CTRL
; (LET ((#:G0 CL+SSL::SSL))
; (LET (#)
; (LET #
; #)))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION ("SSL_CTX_set_default_passwd_cb" SSL-CTX-SET-DEFAULT-PASSWD-CB) ...)
; processing (DEFINE-CRYPTO-FUNCTION-EX (:VANISHED "1.1.0") ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-CRYPTO-FUNCTION-EX (:VANISHED "1.1.0")
; (CL+SSL::DEFINE-CRYPTO-FUNCTION-EX
; (:VANISHED "1.1.0")
; ("CRYPTO_num_locks" CL+SSL::CRYPTO-NUM-LOCKS)
; :INT)
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::CRYPTO-NUM-LOCKS
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::CRYPTO-NUM-LOCKS
; (CFFI-SYS:%FOREIGN-FUNCALL "CRYPTO_num_locks" (:INT) :CONVENTION :CDECL
; :LIBRARY :DEFAULT)))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-CRYPTO-FUNCTION-EX (:VANISHED "1.1.0") ...)
; processing (DEFINE-CRYPTO-FUNCTION-EX (:VANISHED "1.1.0") ...)
; processing (DEFINE-CRYPTO-FUNCTION ("RAND_seed" RAND-SEED) ...)
; processing (DEFINE-CRYPTO-FUNCTION ("RAND_bytes" RAND-BYTES) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-CRYPTO-FUNCTION ("RAND_bytes" RAND-BYTES)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("RAND_bytes" CL+SSL::RAND-BYTES)
; :INT
; (CL+SSL::BUF :POINTER)
; (CL+SSL::NUM :INT))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::RAND-BYTES
; (CL+SSL::BUF CL+SSL::NUM)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::RAND-BYTES
; (LET ((#:G0 CL+SSL::BUF))
; (LET (#)
; (CFFI-SYS:%FOREIGN-FUNCALL "RAND_bytes" # :CONVENTION :CDECL
; :LIBRARY :DEFAULT)))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION ("SSL_CTX_set_verify_depth" SSL-CTX-SET-VERIFY-DEPTH) ...)
; processing (DEFINE-SSL-FUNCTION ("SSL_CTX_set_verify" SSL-CTX-SET-VERIFY) ...)
; processing (DEFINE-SSL-FUNCTION ("SSL_get_verify_result" SSL-GET-VERIFY-RESULT) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION ("SSL_get_verify_result" SSL-GET-VERIFY-RESULT)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_get_verify_result" CL+SSL::SSL-GET-VERIFY-RESULT)
; :LONG
; (CL+SSL::SSL CL+SSL::SSL-POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-GET-VERIFY-RESULT
; (CL+SSL::SSL)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-GET-VERIFY-RESULT
; (LET ((#:G0 CL+SSL::SSL))
; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_get_verify_result"
; (:POINTER #:G0 :LONG) :CONVENTION :CDECL
; :LIBRARY CL+SSL::LIBSSL))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION ("SSL_get_peer_certificate" SSL-GET-PEER-CERTIFICATE) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in:
; DEFINE-SSL-FUNCTION ("SSL_get_peer_certificate" SSL-GET-PEER-CERTIFICATE)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_get_peer_certificate" CL+SSL::SSL-GET-PEER-CERTIFICATE)
; :POINTER
; (CL+SSL::SSL CL+SSL::SSL-POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-GET-PEER-CERTIFICATE
; (CL+SSL::SSL)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-GET-PEER-CERTIFICATE
; (LET ((#:G0 CL+SSL::SSL))
; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_get_peer_certificate"
; (:POINTER #:G0 :POINTER) :CONVENTION
; :CDECL :LIBRARY CL+SSL::LIBSSL))))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-CRYPTO-FUNCTION ("X509_free" X509-FREE) ...)
; processing (DEFINE-CRYPTO-FUNCTION ("X509_NAME_oneline" X509-NAME-ONELINE) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-CRYPTO-FUNCTION ("X509_NAME_oneline" X509-NAME-ONELINE)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("X509_NAME_oneline" CL+SSL::X509-NAME-ONELINE)
; :POINTER
; (CL+SSL::X509-NAME :POINTER)
; (CL+SSL::BUF :POINTER)
; (CL+SSL::SIZE :INT))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::X509-NAME-ONELINE
; (CL+SSL::X509-NAME CL+SSL::BUF CL+SSL::SIZE)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::X509-NAME-ONELINE
; (LET ((#:G0 CL+SSL::X509-NAME))
; (LET (#)
; (LET #
; #)))))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-CRYPTO-FUNCTION ("X509_NAME_get_index_by_NID" X509-NAME-GET-INDEX-BY-NID) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in:
; DEFINE-CRYPTO-FUNCTION ("X509_NAME_get_index_by_NID"
; X509-NAME-GET-INDEX-BY-NID)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("X509_NAME_get_index_by_NID" CL+SSL::X509-NAME-GET-INDEX-BY-NID)
; :INT
; (CL+SSL::NAME :POINTER)
; (CL+SSL::NID :INT)
; (CL+SSL::LASTPOS :INT))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::X509-NAME-GET-INDEX-BY-NID
; (CL+SSL::NAME CL+SSL::NID CL+SSL::LASTPOS)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::X509-NAME-GET-INDEX-BY-NID
; (LET ((#:G0 CL+SSL::NAME))
; (LET (#)
; (LET #
; #)))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-CRYPTO-FUNCTION ("X509_NAME_get_entry" X509-NAME-GET-ENTRY) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-CRYPTO-FUNCTION ("X509_NAME_get_entry" X509-NAME-GET-ENTRY)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("X509_NAME_get_entry" CL+SSL::X509-NAME-GET-ENTRY)
; :POINTER
; (CL+SSL::NAME :POINTER)
; (LOG :INT))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::X509-NAME-GET-ENTRY
; (CL+SSL::NAME LOG)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::X509-NAME-GET-ENTRY
; (LET ((#:G0 CL+SSL::NAME))
; (LET (#)
; (CFFI-SYS:%FOREIGN-FUNCALL "X509_NAME_get_entry" # :CONVENTION
; :CDECL :LIBRARY :DEFAULT)))))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-CRYPTO-FUNCTION ("X509_NAME_ENTRY_get_data" X509-NAME-ENTRY-GET-DATA) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in:
; DEFINE-CRYPTO-FUNCTION ("X509_NAME_ENTRY_get_data" X509-NAME-ENTRY-GET-DATA)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("X509_NAME_ENTRY_get_data" CL+SSL::X509-NAME-ENTRY-GET-DATA)
; :POINTER
; (CL+SSL::NAME-ENTRY :POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::X509-NAME-ENTRY-GET-DATA
; (CL+SSL::NAME-ENTRY)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::X509-NAME-ENTRY-GET-DATA
; (LET ((#:G0 CL+SSL::NAME-ENTRY))
; (CFFI-SYS:%FOREIGN-FUNCALL "X509_NAME_ENTRY_get_data"
; (:POINTER #:G0 :POINTER) :CONVENTION
; :CDECL :LIBRARY :DEFAULT))))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-CRYPTO-FUNCTION ("X509_get_issuer_name" X509-GET-ISSUER-NAME) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in:
; DEFINE-CRYPTO-FUNCTION ("X509_get_issuer_name" X509-GET-ISSUER-NAME)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("X509_get_issuer_name" CL+SSL::X509-GET-ISSUER-NAME)
; :POINTER
; (CL+SSL::X509 :POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::X509-GET-ISSUER-NAME
; (CL+SSL::X509)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::X509-GET-ISSUER-NAME
; (LET ((#:G0 CL+SSL::X509))
; (CFFI-SYS:%FOREIGN-FUNCALL "X509_get_issuer_name"
; (:POINTER #:G0 :POINTER) :CONVENTION
; :CDECL :LIBRARY :DEFAULT))))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-CRYPTO-FUNCTION ("X509_get_subject_name" X509-GET-SUBJECT-NAME) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in:
; DEFINE-CRYPTO-FUNCTION ("X509_get_subject_name" X509-GET-SUBJECT-NAME)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("X509_get_subject_name" CL+SSL::X509-GET-SUBJECT-NAME)
; :POINTER
; (CL+SSL::X509 :POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::X509-GET-SUBJECT-NAME
; (CL+SSL::X509)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::X509-GET-SUBJECT-NAME
; (LET ((#:G0 CL+SSL::X509))
; (CFFI-SYS:%FOREIGN-FUNCALL "X509_get_subject_name"
; (:POINTER #:G0 :POINTER) :CONVENTION
; :CDECL :LIBRARY :DEFAULT))))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-CRYPTO-FUNCTION ("X509_get_ext_d2i" X509-GET-EXT-D2I) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-CRYPTO-FUNCTION ("X509_get_ext_d2i" X509-GET-EXT-D2I)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("X509_get_ext_d2i" CL+SSL::X509-GET-EXT-D2I)
; :POINTER
; (CL+SSL::CERT :POINTER)
; (CL+SSL::NID :INT)
; (CL+SSL::CRIT :POINTER)
; (CL+SSL::IDX :POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::X509-GET-EXT-D2I
; (CL+SSL::CERT CL+SSL::NID CL+SSL::CRIT CL+SSL::IDX)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::X509-GET-EXT-D2I
; (LET ((#:G0 CL+SSL::CERT))
; (LET (#)
; (LET #
; #)))))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-CRYPTO-FUNCTION ("X509_STORE_CTX_get_error" X509-STORE-CTX-GET-ERROR) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in:
; DEFINE-CRYPTO-FUNCTION ("X509_STORE_CTX_get_error" X509-STORE-CTX-GET-ERROR)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("X509_STORE_CTX_get_error" CL+SSL::X509-STORE-CTX-GET-ERROR)
; :INT
; (CL+SSL::CTX :POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::X509-STORE-CTX-GET-ERROR
; (CL+SSL::CTX)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::X509-STORE-CTX-GET-ERROR
; (LET ((#:G0 CL+SSL::CTX))
; (CFFI-SYS:%FOREIGN-FUNCALL "X509_STORE_CTX_get_error"
; (:POINTER #:G0 :INT) :CONVENTION :CDECL
; :LIBRARY :DEFAULT))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-CRYPTO-FUNCTION ("d2i_X509" D2I-X509) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-CRYPTO-FUNCTION ("d2i_X509" D2I-X509)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("d2i_X509" CL+SSL::D2I-X509)
; :POINTER
; (CL+SSL::*PX :POINTER)
; (CL+SSL::IN :POINTER)
; (CL+SSL::LEN :INT))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::D2I-X509
; (CL+SSL::*PX CL+SSL::IN CL+SSL::LEN)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::D2I-X509
; (LET ((#:G0 CL+SSL::*PX))
; (LET (#)
; (LET #
; #)))))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFCONSTANT +GEN-OTHERNAME+ ...)
; processing (DEFCONSTANT +GEN-EMAIL+ ...)
; processing (DEFCONSTANT +GEN-DNS+ ...)
; processing (DEFCONSTANT +GEN-X400+ ...)
; processing (DEFCONSTANT +GEN-DIRNAME+ ...)
; processing (DEFCONSTANT +GEN-EDIPARTY+ ...)
; processing (DEFCONSTANT +GEN-URI+ ...)
; processing (DEFCONSTANT +GEN-IPADD+ ...)
; processing (DEFCONSTANT +GEN-RID+ ...)
; processing (DEFCONSTANT +V-ASN1-OCTET-STRING+ ...)
; processing (DEFCONSTANT +V-ASN1-UTF8STRING+ ...)
; processing (DEFCONSTANT +V-ASN1-PRINTABLESTRING+ ...)
; processing (DEFCONSTANT +V-ASN1-TELETEXSTRING+ ...)
; processing (DEFCONSTANT +V-ASN1-IASTRING+ ...)
; processing (DEFCONSTANT +V-ASN1-UNIVERSALSTRING+ ...)
; processing (DEFCONSTANT +V-ASN1-BMPSTRING+ ...)
; processing (DEFCONSTANT +NID-SUBJECT-ALT-NAME+ ...)
; processing (DEFCONSTANT +NID-COMMONNAME+ ...)
; processing (CFFI:DEFCSTRUCT GENERAL-NAME ...)
; processing (DEFINE-CRYPTO-FUNCTION-EX (:VANISHED "1.1.0") ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-CRYPTO-FUNCTION-EX (:VANISHED "1.1.0")
; (CL+SSL::DEFINE-CRYPTO-FUNCTION-EX
; (:VANISHED "1.1.0")
; ("sk_value" CL+SSL::SK-VALUE)
; :POINTER
; (CL+SSL::STACK :POINTER)
; (CL+SSL::INDEX :INT))
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SK-VALUE
; (CL+SSL::STACK CL+SSL::INDEX)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SK-VALUE
; (LET ((#:G0 CL+SSL::STACK))
; (LET (#)
; (CFFI-SYS:%FOREIGN-FUNCALL "sk_value" # :CONVENTION :CDECL :LIBRARY
; :DEFAULT)))))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-CRYPTO-FUNCTION-EX (:VANISHED "1.1.0") ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-CRYPTO-FUNCTION-EX (:VANISHED "1.1.0")
; (CL+SSL::DEFINE-CRYPTO-FUNCTION-EX
; (:VANISHED "1.1.0")
; ("sk_num" CL+SSL::SK-NUM)
; :INT
; (CL+SSL::STACK :POINTER))
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SK-NUM
; (CL+SSL::STACK)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SK-NUM
; (LET ((#:G0 CL+SSL::STACK))
; (CFFI-SYS:%FOREIGN-FUNCALL "sk_num" (:POINTER #:G0 :INT) :CONVENTION
; :CDECL :LIBRARY :DEFAULT))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-CRYPTO-FUNCTION-EX (:SINCE "1.1.0") ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-CRYPTO-FUNCTION-EX (:SINCE "1.1.0")
; (CL+SSL::DEFINE-CRYPTO-FUNCTION-EX
; (:SINCE "1.1.0")
; ("OPENSSL_sk_value" CL+SSL::OPENSSL-SK-VALUE)
; :POINTER
; (CL+SSL::STACK :POINTER)
; (CL+SSL::INDEX :INT))
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::OPENSSL-SK-VALUE
; (CL+SSL::STACK CL+SSL::INDEX)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::OPENSSL-SK-VALUE
; (LET ((#:G0 CL+SSL::STACK))
; (LET (#)
; (CFFI-SYS:%FOREIGN-FUNCALL "OPENSSL_sk_value" # :CONVENTION :CDECL
; :LIBRARY :DEFAULT)))))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-CRYPTO-FUNCTION-EX (:SINCE "1.1.0") ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-CRYPTO-FUNCTION-EX (:SINCE "1.1.0")
; (CL+SSL::DEFINE-CRYPTO-FUNCTION-EX
; (:SINCE "1.1.0")
; ("OPENSSL_sk_num" CL+SSL::OPENSSL-SK-NUM)
; :INT
; (CL+SSL::STACK :POINTER))
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::OPENSSL-SK-NUM
; (CL+SSL::STACK)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::OPENSSL-SK-NUM
; (LET ((#:G0 CL+SSL::STACK))
; (CFFI-SYS:%FOREIGN-FUNCALL "OPENSSL_sk_num" (:POINTER #:G0 :INT)
; :CONVENTION :CDECL :LIBRARY :DEFAULT))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DECLAIM (FTYPE # ...))
; processing (DEFUN SK-GENERAL-NAME-VALUE ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFUN SK-GENERAL-NAME-VALUE
; (DEFUN CL+SSL::SK-GENERAL-NAME-VALUE (CL+SSL::NAMES CL+SSL::INDEX)
; (IF (AND (NOT (CL+SSL::LIBRESSLP)) (CL+SSL::OPENSSL-IS-AT-LEAST 1 1))
; (CL+SSL::OPENSSL-SK-VALUE CL+SSL::NAMES CL+SSL::INDEX)
; (CL+SSL::SK-VALUE CL+SSL::NAMES CL+SSL::INDEX)))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SK-GENERAL-NAME-VALUE
; (CL+SSL::NAMES CL+SSL::INDEX)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SK-GENERAL-NAME-VALUE
; (IF (AND (NOT #) (CL+SSL::OPENSSL-IS-AT-LEAST 1 1))
; (CL+SSL::OPENSSL-SK-VALUE CL+SSL::NAMES CL+SSL::INDEX)
; (CL+SSL::SK-VALUE CL+SSL::NAMES CL+SSL::INDEX))))
;
; note: Type assertion too complex to check:
; (VALUES SB-SYS:SYSTEM-AREA-POINTER &REST T).
; It allows an unknown number of values, consider using
; (VALUES SB-SYS:SYSTEM-AREA-POINTER &OPTIONAL).
; processing (DECLAIM (FTYPE # ...))
; processing (DEFUN SK-GENERAL-NAME-NUM ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFUN SK-GENERAL-NAME-NUM
; (DEFUN CL+SSL::SK-GENERAL-NAME-NUM (CL+SSL::NAMES)
; (IF (AND (NOT (CL+SSL::LIBRESSLP)) (CL+SSL::OPENSSL-IS-AT-LEAST 1 1))
; (CL+SSL::OPENSSL-SK-NUM CL+SSL::NAMES)
; (CL+SSL::SK-NUM CL+SSL::NAMES)))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SK-GENERAL-NAME-NUM
; (CL+SSL::NAMES)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SK-GENERAL-NAME-NUM
; (IF (AND (NOT #) (CL+SSL::OPENSSL-IS-AT-LEAST 1 1))
; (CL+SSL::OPENSSL-SK-NUM CL+SSL::NAMES)
; (CL+SSL::SK-NUM CL+SSL::NAMES))))
;
; note: Type assertion too complex to check:
; (VALUES FIXNUM &REST T).
; It allows an unknown number of values, consider using
; (VALUES FIXNUM &OPTIONAL).
; processing (DEFINE-CRYPTO-FUNCTION ("GENERAL_NAMES_free" GENERAL-NAMES-FREE) ...)
; processing (DEFINE-CRYPTO-FUNCTION ("ASN1_STRING_data" ASN1-STRING-DATA) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-CRYPTO-FUNCTION ("ASN1_STRING_data" ASN1-STRING-DATA)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("ASN1_STRING_data" CL+SSL::ASN1-STRING-DATA)
; :POINTER
; (CL+SSL::ASN1-STRING :POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::ASN1-STRING-DATA
; (CL+SSL::ASN1-STRING)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::ASN1-STRING-DATA
; (LET ((#:G0 CL+SSL::ASN1-STRING))
; (CFFI-SYS:%FOREIGN-FUNCALL "ASN1_STRING_data"
; (:POINTER #:G0 :POINTER) :CONVENTION
; :CDECL :LIBRARY :DEFAULT))))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-CRYPTO-FUNCTION ("ASN1_STRING_length" ASN1-STRING-LENGTH) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-CRYPTO-FUNCTION ("ASN1_STRING_length" ASN1-STRING-LENGTH)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("ASN1_STRING_length" CL+SSL::ASN1-STRING-LENGTH)
; :INT
; (CL+SSL::ASN1-STRING :POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::ASN1-STRING-LENGTH
; (CL+SSL::ASN1-STRING)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::ASN1-STRING-LENGTH
; (LET ((#:G0 CL+SSL::ASN1-STRING))
; (CFFI-SYS:%FOREIGN-FUNCALL "ASN1_STRING_length" (:POINTER #:G0 :INT)
; :CONVENTION :CDECL :LIBRARY :DEFAULT))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-CRYPTO-FUNCTION ("ASN1_STRING_type" ASN1-STRING-TYPE) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-CRYPTO-FUNCTION ("ASN1_STRING_type" ASN1-STRING-TYPE)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("ASN1_STRING_type" CL+SSL::ASN1-STRING-TYPE)
; :INT
; (CL+SSL::ASN1-STRING :POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::ASN1-STRING-TYPE
; (CL+SSL::ASN1-STRING)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::ASN1-STRING-TYPE
; (LET ((#:G0 CL+SSL::ASN1-STRING))
; (CFFI-SYS:%FOREIGN-FUNCALL "ASN1_STRING_type" (:POINTER #:G0 :INT)
; :CONVENTION :CDECL :LIBRARY :DEFAULT))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (CFFI:DEFCSTRUCT ASN1_STRING_ST ...)
; processing (DEFINE-SSL-FUNCTION ("SSL_CTX_set_default_verify_paths" SSL-CTX-SET-DEFAULT-VERIFY-PATHS) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in:
; DEFINE-SSL-FUNCTION ("SSL_CTX_set_default_verify_paths"
; SSL-CTX-SET-DEFAULT-VERIFY-PATHS)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_CTX_set_default_verify_paths"
; CL+SSL::SSL-CTX-SET-DEFAULT-VERIFY-PATHS)
; :INT
; (CL+SSL::CTX :POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-CTX-SET-DEFAULT-VERIFY-PATHS
; (CL+SSL::CTX)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-CTX-SET-DEFAULT-VERIFY-PATHS
; (LET ((#:G0 CL+SSL::CTX))
; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_CTX_set_default_verify_paths"
; (:POINTER #:G0 :INT) :CONVENTION :CDECL
; :LIBRARY CL+SSL::LIBSSL))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION-EX (:SINCE "1.1.0") ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION-EX (:SINCE "1.1.0")
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:SINCE "1.1.0")
; ("SSL_CTX_set_default_verify_dir" CL+SSL::SSL-CTX-SET-DEFAULT-VERIFY-DIR)
; :INT
; (CL+SSL::CTX :POINTER))
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-CTX-SET-DEFAULT-VERIFY-DIR
; (CL+SSL::CTX)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-CTX-SET-DEFAULT-VERIFY-DIR
; (LET ((#:G0 CL+SSL::CTX))
; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_CTX_set_default_verify_dir"
; (:POINTER #:G0 :INT) :CONVENTION :CDECL
; :LIBRARY CL+SSL::LIBSSL))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION-EX (:SINCE "1.1.0") ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION-EX (:SINCE "1.1.0")
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:SINCE "1.1.0")
; ("SSL_CTX_set_default_verify_file" CL+SSL::SSL-CTX-SET-DEFAULT-VERIFY-FILE)
; :INT
; (CL+SSL::CTX :POINTER))
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-CTX-SET-DEFAULT-VERIFY-FILE
; (CL+SSL::CTX)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-CTX-SET-DEFAULT-VERIFY-FILE
; (LET ((#:G0 CL+SSL::CTX))
; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_CTX_set_default_verify_file"
; (:POINTER #:G0 :INT) :CONVENTION :CDECL
; :LIBRARY CL+SSL::LIBSSL))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-CRYPTO-FUNCTION ("RSA_generate_key" RSA-GENERATE-KEY) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-CRYPTO-FUNCTION ("RSA_generate_key" RSA-GENERATE-KEY)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("RSA_generate_key" CL+SSL::RSA-GENERATE-KEY)
; :POINTER
; (CL+SSL::NUM :INT)
; (CL+SSL::E :UNSIGNED-LONG)
; (CL+SSL::CALLBACK :POINTER)
; (CL+SSL::OPT :POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::RSA-GENERATE-KEY
; (CL+SSL::NUM CL+SSL::E CL+SSL::CALLBACK CL+SSL::OPT)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::RSA-GENERATE-KEY
; (LET ((#:G0 CL+SSL::NUM))
; (LET (#)
; (LET #
; #)))))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-CRYPTO-FUNCTION ("RSA_free" RSA-FREE) ...)
; processing (DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0") ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0")
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:VANISHED "1.1.0")
; ("SSL_CTX_set_tmp_rsa_callback" CL+SSL::SSL-CTX-SET-TMP-RSA-CALLBACK)
; :POINTER
; (CL+SSL::CTX :POINTER)
; (CL+SSL::CALLBACK :POINTER))
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-CTX-SET-TMP-RSA-CALLBACK
; (CL+SSL::CTX CL+SSL::CALLBACK)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-CTX-SET-TMP-RSA-CALLBACK
; (LET ((#:G0 CL+SSL::CTX))
; (LET (#)
; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_CTX_set_tmp_rsa_callback" #
; :CONVENTION :CDECL :LIBRARY
; CL+SSL::LIBSSL)))))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (CFFI:DEFCALLBACK TMP-RSA-CALLBACK ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: CFFI:DEFCALLBACK TMP-RSA-CALLBACK
; (= CL+SSL::KEY-LENGTH 512)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
; (= CL+SSL::KEY-LENGTH 1024)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
; (CL+SSL::RSA-GENERATE-KEY LENGTH CL+SSL::+RSA_F4+ (CFFI-SYS:NULL-POINTER)
; (CFFI-SYS:NULL-POINTER))
;
; note: doing SAP to pointer coercion (cost 20)
;
; note: doing SAP to pointer coercion (cost 20)
; processing (DEFVAR *SOCKET*)
; processing (DECLAIM (INLINE ENSURE-SSL-FUNCALL))
; processing (DEFUN ENSURE-SSL-FUNCALL ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFUN ENSURE-SSL-FUNCALL
; (APPLY CL+SSL::FUNC CL+SSL::ARGS)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; FUNC is not known to be a function
; (PLUSP CL+SSL::NBYTES)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a T, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a T, not a FIXNUM.
; etc.
; processing (DECLAIM (INLINE NONBLOCKING-SSL-FUNCALL))
; processing (DEFUN NONBLOCKING-SSL-FUNCALL ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFUN NONBLOCKING-SSL-FUNCALL
; (APPLY CL+SSL::FUNC CL+SSL::ARGS)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; FUNC is not known to be a function
; (PLUSP CL+SSL::NBYTES)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a T, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a T, not a FIXNUM.
; etc.
; processing (DEFUN OUTPUT-WAIT ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFUN OUTPUT-WAIT
; (- CL+SSL::DEADLINE (GET-INTERNAL-REAL-TIME))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; (/ (- CL+SSL::DEADLINE (GET-INTERNAL-REAL-TIME))
; INTERNAL-TIME-UNITS-PER-SECOND)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x/2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
; (- CL+SSL::DEADLINE (GET-INTERNAL-REAL-TIME))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 61), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 61), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; processing (DEFUN INPUT-WAIT ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFUN INPUT-WAIT
; (- CL+SSL::DEADLINE (GET-INTERNAL-REAL-TIME))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; (/ (- CL+SSL::DEADLINE (GET-INTERNAL-REAL-TIME))
; INTERNAL-TIME-UNITS-PER-SECOND)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x/2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
; (- CL+SSL::DEADLINE (GET-INTERNAL-REAL-TIME))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 61), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 61), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; processing (DEFVAR *PEM-PASSWORD* ...)
; processing (CFFI:DEFCALLBACK PEM-PASSWORD-CALLBACK ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: CFFI:DEFCALLBACK PEM-PASSWORD-CALLBACK
; (COERCE CL+SSL::*PEM-PASSWORD* 'BASE-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (AND (NOT BASE-STRING) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST (AND (NOT BASE-STRING) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY
; * (*)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST (AND (NOT BASE-STRING) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY
; CHARACTER
; (*)).
; (1- CL+SSL::SIZE)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (SIGNED-BYTE 32), not a FIXNUM.
; The result is a (VALUES (INTEGER -2147483649 2147483646) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (SIGNED-BYTE 32), not a FIXNUM.
; The result is a (VALUES (INTEGER -2147483649 2147483646) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; (CFFI:DEFCALLBACK CL+SSL::PEM-PASSWORD-CALLBACK
; :INT
; ((CL+SSL::BUF :POINTER) (CL+SSL::SIZE :INT) (CL+SSL::RWFLAG :INT)
; (CL+SSL::UNUSED :POINTER))
; (DECLARE (IGNORE CL+SSL::RWFLAG CL+SSL::UNUSED))
; (LET* ((CL+SSL::PASSWORD-STR (COERCE CL+SSL::*PEM-PASSWORD* 'BASE-STRING))
; (CL+SSL::TMP (CFFI:FOREIGN-STRING-ALLOC CL+SSL::PASSWORD-STR)))
; (CFFI:FOREIGN-FUNCALL "strncpy" :POINTER CL+SSL::BUF :POINTER CL+SSL::TMP
; :INT CL+SSL::SIZE)
; (CFFI:FOREIGN-STRING-FREE CL+SSL::TMP)
; (SETF (CFFI:MEM-REF CL+SSL::BUF :CHAR #) 0)
; (CFFI:FOREIGN-FUNCALL "strlen" :POINTER CL+SSL::BUF :INT)))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN-INTERNALS:ALIEN-CALLBACK SB-ALIEN-INTERNALS:%SAP-ALIEN
; --> SB-ALIEN::%ALIEN-CALLBACK-SAP LAMBDA
; ==>
; #'(LAMBDA (CL+SSL::BUF CL+SSL::SIZE CL+SSL::RWFLAG CL+SSL::UNUSED)
; (LET ((CL+SSL::BUF CL+SSL::BUF)
; (CL+SSL::SIZE CL+SSL::SIZE)
; (CL+SSL::RWFLAG CL+SSL::RWFLAG)
; (CL+SSL::UNUSED CL+SSL::UNUSED))
; (DECLARE (IGNORE CL+SSL::RWFLAG CL+SSL::UNUSED))
; (BLOCK CL+SSL::PEM-PASSWORD-CALLBACK
; (LET* (# #)
; (CFFI:FOREIGN-FUNCALL "strncpy" :POINTER CL+SSL::BUF :POINTER
; CL+SSL::TMP :INT CL+SSL::SIZE)
; (CFFI:FOREIGN-STRING-FREE CL+SSL::TMP)
; (SETF #)
; (CFFI:FOREIGN-FUNCALL "strlen" :POINTER CL+SSL::BUF :INT)))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFMACRO WITH-PEM-PASSWORD ...)
; processing (DEFUN INIT-PRNG ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFUN INIT-PRNG
; (LENGTH CL+SSL::SEED-BYTE-SEQUENCE)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (ELT CL+SSL::SEED-BYTE-SEQUENCE CL+SSL::I)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a LIST.
; (CL+SSL::RAND-SEED CL+SSL::PTR LENGTH)
;
; note: doing SAP to pointer coercion (cost 20)
; processing (DEFUN SSL-CTX-SET-SESSION-CACHE-MODE ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFUN SSL-CTX-SET-SESSION-CACHE-MODE
; (CL+SSL::SSL-CTX-CTRL CL+SSL::CTX CL+SSL::+SSL_CTRL_SET_SESS_CACHE_MODE+
; CL+SSL::MODE (CFFI-SYS:NULL-POINTER))
;
; note: doing SAP to pointer coercion (cost 20)
; processing (DEFUN SSL-SET-TLSEXT-HOST-NAME ...)
; processing (DEFVAR *LOCKS*)
; processing (DEFCONSTANT +CRYPTO-LOCK+ ...)
; processing (DEFCONSTANT +CRYPTO-UNLOCK+ ...)
; processing (DEFCONSTANT +CRYPTO-READ+ ...)
; processing (DEFCONSTANT +CRYPTO-WRITE+ ...)
; processing (CFFI:DEFCALLBACK LOCKING-CALLBACK ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: CFFI:DEFCALLBACK LOCKING-CALLBACK
; (ELT CL+SSL::*LOCKS* CL+SSL::N)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a LIST.
; (LOGTEST CL+SSL::MODE CL+SSL::+CRYPTO-LOCK+)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a T, not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; etc.
; (LOGTEST CL+SSL::MODE CL+SSL::+CRYPTO-UNLOCK+)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; processing (DEFVAR *THREADS* ...)
; processing (DEFVAR *THREAD-COUNTER* ...)
; processing (DEFPARAMETER *GLOBAL-LOCK* ...)
; processing (CFFI:DEFCALLBACK THREADID-CALLBACK ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: CFFI:DEFCALLBACK THREADID-CALLBACK
; (INCF CL+SSL::*THREAD-COUNTER*)
; --> THE
; ==>
; (+ 1 CL+SSL::*THREAD-COUNTER*)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
; processing (DEFVAR *SSL-CHECK-VERIFY-P* ...)
; processing (DEFUN DEFAULT-SSL-METHOD ...)
; processing (DEFUN INITIALIZE ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFUN INITIALIZE
; (FUNCALL (OR METHOD (CL+SSL::DEFAULT-SSL-METHOD)))
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; processing (DEFUN ENSURE-INITIALIZED ...)
; processing (DEFUN USE-CERTIFICATE-CHAIN-FILE ...)
; processing (DEFUN RELOAD ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl+ssl/src/ffi-tmp5ZHGID8G.fasl
; compilation finished in 0:00:01.644
; compiling file "/usr/share/common-lisp/source/cl+ssl/src/x509.lisp" (written 09 JUN 2020 04:49:50 PM):
; processing (IN-PACKAGE :CL+SSL)
; processing (DEFGENERIC DECODE-ASN1-STRING ...)
; processing (DEFUN COPY-BYTES-TO-LISP-VECTOR ...)
; processing (DEFUN ASN1-STRING-BYTES-VECTOR ...)
; processing (DEFUN ASN1-IASTRING-CHAR-P ...)
; processing (DEFUN ASN1-IASTRING-P ...)
; processing (DEFMETHOD DECODE-ASN1-STRING ...)
; processing (DEFUN ASN1-PRINTABLE-CHAR-P ...)
; processing (DEFUN ASN1-PRINTABLE-STRING-P ...)
; processing (DEFMETHOD DECODE-ASN1-STRING ...)
; processing (DEFMETHOD DECODE-ASN1-STRING ...)
; processing (DEFMETHOD DECODE-ASN1-STRING ...)
; processing (DEFUN ASN1-TELETEX-CHAR-P ...)
; processing (DEFUN ASN1-TELETEX-STRING-P ...)
; processing (DEFMETHOD DECODE-ASN1-STRING ...)
; processing (DEFMETHOD DECODE-ASN1-STRING ...)
; processing (DEFUN TRY-GET-ASN1-STRING-DATA ...)
; processing (DEFUN SLURP-STREAM ...)
; processing (DEFGENERIC DECODE-CERTIFICATE ...)
; processing (DEFMETHOD DECODE-CERTIFICATE ...)
; processing (DEFUN CERT-FORMAT-FROM-PATH ...)
; processing (DEFUN DECODE-CERTIFICATE-FROM-FILE ...)
; processing (DEFUN CERTIFICATE-ALT-NAMES ...)
; processing (DEFUN CERTIFICATE-DNS-ALT-NAMES ...)
; processing (DEFUN CERTIFICATE-SUBJECT-COMMON-NAMES ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl+ssl/src/x509-tmp9D2N5DM.fasl
; compilation finished in 0:00:00.380
; compiling file "/usr/share/common-lisp/source/cl+ssl/src/ffi-buffer-all.lisp" (written 09 JUN 2020 04:49:50 PM):
; processing (IN-PACKAGE :CL+SSL)
; processing (DEFCONSTANT +INITIAL-BUFFER-SIZE+ ...)
; processing (DECLAIM (INLINE MAKE-BUFFER ...))
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl+ssl/src/ffi-buffer-all-tmpKDSLP2NX.fasl
; compilation finished in 0:00:00.004
; compiling file "/usr/share/common-lisp/source/cl+ssl/src/ffi-buffer.lisp" (written 09 JUN 2020 04:49:50 PM):
; processing (IN-PACKAGE :CL+SSL)
; processing (DEFUN MAKE-BUFFER ...)
; processing (DEFUN BUFFER-LENGTH ...)
; processing (DEFUN BUFFER-ELT ...)
; processing (DEFUN SET-BUFFER-ELT ...)
; processing (DEFSETF BUFFER-ELT ...)
; processing (DEFUN S/B-REPLACE ...)
; processing (DEFUN B/S-REPLACE ...)
; processing (DEFMACRO WITH-POINTER-TO-VECTOR-DATA ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl+ssl/src/ffi-buffer-tmp4QLHV6NG.fasl
; compilation finished in 0:00:00.068
; compiling file "/usr/share/common-lisp/source/cl+ssl/src/streams.lisp" (written 09 JUN 2020 04:49:50 PM):
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL) ...)
; processing (IN-PACKAGE :CL+SSL)
; processing (DEFVAR *DEFAULT-CIPHER-LIST* ...)
; processing (DEFCLASS SSL-STREAM ...)
; processing (DEFMETHOD PRINT-OBJECT ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/streams.lisp
; in: DEFMETHOD PRINT-OBJECT (SSL-STREAM T)
; (FORMAT STREAM "for ~A" (CL+SSL::SSL-STREAM-SOCKET CL+SSL::OBJECT))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL.
; processing (DEFCLASS SSL-SERVER-STREAM ...)
; processing (DEFMETHOD STREAM-ELEMENT-TYPE ...)
; processing (DEFMETHOD CLOSE ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/streams.lisp
; in: DEFMETHOD CLOSE (SSL-STREAM)
; (FUNCALL (CL+SSL::SSL-CLOSE-CALLBACK STREAM))
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; processing (DEFMETHOD OPEN-STREAM-P ...)
; processing (DEFMETHOD STREAM-LISTEN ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/streams.lisp
; in: DEFMETHOD STREAM-LISTEN (SSL-STREAM)
; (CL+SSL::BUFFER-ELT CL+SSL::BUF 0)
; --> BLOCK ELT
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (CL+SSL::NONBLOCKING-SSL-FUNCALL STREAM CL+SSL::HANDLE #'CL+SSL::SSL-READ
; CL+SSL::HANDLE CL+SSL::PTR 1)
; --> BLOCK LOOP BLOCK TAGBODY PROGN
; ==>
; (LET ((CL+SSL::NBYTES
; (LET (#)
; (APPLY CL+SSL::FUNC CL+SSL::ARGS))))
; (WHEN (PLUSP CL+SSL::NBYTES) (RETURN CL+SSL::NBYTES))
; (LET ((ERROR (CL+SSL::SSL-GET-ERROR CL+SSL::HANDLE CL+SSL::NBYTES)))
; (CASE ERROR
; ((2 3) (RETURN CL+SSL::NBYTES))
; (T
; (CL+SSL::SSL-SIGNAL-ERROR CL+SSL::HANDLE CL+SSL::FUNC ERROR
; CL+SSL::NBYTES)))))
;
; note: doing signed word to integer coercion (cost 20) to NBYTES
; processing (DEFMETHOD STREAM-READ-BYTE ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/streams.lisp
; in: DEFMETHOD STREAM-READ-BYTE (SSL-STREAM)
; (CL+SSL::BUFFER-ELT CL+SSL::BUF 0)
; --> BLOCK ELT
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (CL+SSL::ENSURE-SSL-FUNCALL STREAM CL+SSL::HANDLE #'CL+SSL::SSL-READ
; CL+SSL::HANDLE CL+SSL::PTR 1)
; --> BLOCK LOOP BLOCK TAGBODY PROGN
; ==>
; (LET ((CL+SSL::NBYTES
; (LET (#)
; (APPLY CL+SSL::FUNC CL+SSL::ARGS))))
; (WHEN (PLUSP CL+SSL::NBYTES) (RETURN CL+SSL::NBYTES))
; (LET ((ERROR (CL+SSL::SSL-GET-ERROR CL+SSL::HANDLE CL+SSL::NBYTES)))
; (CASE ERROR
; (2 (CL+SSL::INPUT-WAIT STREAM # #))
; (3 (CL+SSL::OUTPUT-WAIT STREAM # #))
; (T
; (CL+SSL::SSL-SIGNAL-ERROR CL+SSL::HANDLE CL+SSL::FUNC ERROR
; CL+SSL::NBYTES)))))
;
; note: doing signed word to integer coercion (cost 20) to NBYTES
; processing (DEFMETHOD STREAM-READ-SEQUENCE ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/streams.lisp
; in: DEFMETHOD STREAM-READ-SEQUENCE (SSL-STREAM T T T)
; (- CL+SSL::END CL+SSL::START)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; (PLUSP LENGTH)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (< CL+SSL::START CL+SSL::END)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a REAL, not a RATIONAL.
; (SETF (ELT CL+SSL::SEQ CL+SSL::START) (CL+SSL::SSL-STREAM-PEEKED-BYTE STREAM))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a LIST.
; (+ CL+SSL::START CL+SSL::READ-BYTES)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; (CL+SSL::BUFFER-LENGTH CL+SSL::BUF)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (CL+SSL::S/B-REPLACE CL+SSL::SEQ CL+SSL::BUF :START1 CL+SSL::START :END1
; (+ CL+SSL::START CL+SSL::READ-BYTES))
; --> BLOCK
; ==>
; (REPLACE CL+SSL::SEQ CL+SSL::BUF :START1 CL+SSL::START1 :END1 CL+SSL::END1
; :START2 CL+SSL::START2 :END2 CL+SSL::END2)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES
; (SIMPLE-ARRAY * (*))
; &REST T).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a SIMPLE-BASE-STRING.
; The second argument is a (OR SIMPLE-BASE-STRING (SIMPLE-ARRAY CHARACTER (*))
; (SIMPLE-ARRAY SINGLE-FLOAT (*))
; (SIMPLE-ARRAY DOUBLE-FLOAT (*))
; SIMPLE-BIT-VECTOR
; (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 29) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*))
; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*))
; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*))
; (SIMPLE-ARRAY FIXNUM (*))
; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*))
; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*))
; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT)
; (*))), not a (SIMPLE-ARRAY CHARACTER (*)).
; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES SIMPLE-BASE-STRING
; &REST T).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)).
; The second argument is a (OR SIMPLE-BASE-STRING (SIMPLE-ARRAY CHARACTER (*))
; (SIMPLE-ARRAY SINGLE-FLOAT (*))
; (SIMPLE-ARRAY DOUBLE-FLOAT (*))
; SIMPLE-BIT-VECTOR
; (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 29) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*))
; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*))
; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*))
; (SIMPLE-ARRAY FIXNUM (*))
; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*))
; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*))
; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT)
; (*))), not a SIMPLE-BASE-STRING.
; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES
; (SIMPLE-ARRAY CHARACTER
; (*))
; &REST T).
; (MIN (- CL+SSL::END CL+SSL::START) (CL+SSL::BUFFER-LENGTH CL+SSL::BUF))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (DOUBLE-FLOAT 0.0d0) (SINGLE-FLOAT 0.0)
; (RATIONAL 0)), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
; (< CL+SSL::START CL+SSL::END)
;
; note: forced to do full call
; unable to do inline float comparison (cost 3) because:
; The first argument is a T, not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
; unable to do inline float comparison (cost 3) because:
; The first argument is a T, not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
; etc.
; (- CL+SSL::END CL+SSL::START)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &REST T).
; etc.
; (MIN (- CL+SSL::END CL+SSL::START) (CL+SSL::BUFFER-LENGTH CL+SSL::BUF))
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 32).
; etc.
; (PLUSP LENGTH)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
; (+ CL+SSL::START CL+SSL::READ-BYTES)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The second argument is a (INTEGER 1 2147483647), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a NUMBER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (CL+SSL::ENSURE-SSL-FUNCALL STREAM CL+SSL::HANDLE #'CL+SSL::SSL-READ
; CL+SSL::HANDLE CL+SSL::PTR LENGTH)
; --> BLOCK LOOP BLOCK TAGBODY PROGN
; ==>
; (LET ((CL+SSL::NBYTES
; (LET (#)
; (APPLY CL+SSL::FUNC CL+SSL::ARGS))))
; (WHEN (PLUSP CL+SSL::NBYTES) (RETURN CL+SSL::NBYTES))
; (LET ((ERROR (CL+SSL::SSL-GET-ERROR CL+SSL::HANDLE CL+SSL::NBYTES)))
; (CASE ERROR
; (2 (CL+SSL::INPUT-WAIT STREAM # #))
; (3 (CL+SSL::OUTPUT-WAIT STREAM # #))
; (T
; (CL+SSL::SSL-SIGNAL-ERROR CL+SSL::HANDLE CL+SSL::FUNC ERROR
; CL+SSL::NBYTES)))))
;
; note: doing signed word to integer coercion (cost 20) to NBYTES
; (+ CL+SSL::START CL+SSL::READ-BYTES)
;
; note: doing signed word to integer coercion (cost 20)
; (INCF CL+SSL::START CL+SSL::READ-BYTES)
;
; note: doing unsigned word to integer coercion (cost 20) to START
; processing (DEFMETHOD STREAM-WRITE-BYTE ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/streams.lisp
; in: DEFMETHOD STREAM-WRITE-BYTE (SSL-STREAM T)
; (INCF (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM))
; ==>
; (+ 1 (CL+SSL::SSL-STREAM-OUTPUT-POINTER #:STREAM4))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; (SETF (CL+SSL::BUFFER-ELT CL+SSL::BUF
; (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM))
; CL+SSL::B)
; --> BLOCK SETF
; ==>
; (SB-KERNEL:%SETELT CL+SSL::BUF CL+SSL::INDEX CL+SSL::VAL)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a LIST.
; (CL+SSL::BUFFER-LENGTH CL+SSL::BUF)
; --> BLOCK
; ==>
; (LENGTH CL+SSL::BUF)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (INCF (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM))
; ==>
; (+ 1 (CL+SSL::SSL-STREAM-OUTPUT-POINTER #:STREAM4))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
; processing (DEFMETHOD STREAM-WRITE-SEQUENCE ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/streams.lisp
; in: DEFMETHOD STREAM-WRITE-SEQUENCE (SSL-STREAM T T T)
; (- CL+SSL::END CL+SSL::START)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; (+ (- CL+SSL::END CL+SSL::START) (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; (>
; (+ (- CL+SSL::END CL+SSL::START) (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM))
; (CL+SSL::BUFFER-LENGTH CL+SSL::BUF))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (- CL+SSL::END CL+SSL::START)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; (CL+SSL::BUFFER-LENGTH CL+SSL::BUF)
; ==>
; (LENGTH CL+SSL::BUF)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (> (- CL+SSL::END CL+SSL::START) (CL+SSL::BUFFER-LENGTH CL+SSL::BUF))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (CL+SSL::BUFFER-LENGTH CL+SSL::BUF)
; ==>
; (LENGTH CL+SSL::BUF)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (CL+SSL::B/S-REPLACE CL+SSL::BUF CL+SSL::SEQ :START1
; (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM) :START2
; CL+SSL::START :END2 CL+SSL::END)
; ==>
; (REPLACE CL+SSL::BUF CL+SSL::SEQ :START1 CL+SSL::START1 :END1 CL+SSL::END1
; :START2 CL+SSL::START2 :END2 CL+SSL::END2)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES
; (SIMPLE-ARRAY * (*))
; &REST T).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a SIMPLE-BASE-STRING.
; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)).
; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES SIMPLE-BASE-STRING
; &REST T).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)).
; The second argument is a SEQUENCE, not a SIMPLE-BASE-STRING.
; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES
; (SIMPLE-ARRAY CHARACTER
; (*))
; &REST T).
; (INCF (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM)
; (- CL+SSL::END CL+SSL::START))
; ==>
; (+ (- CL+SSL::END CL+SSL::START)
; (CL+SSL::SSL-STREAM-OUTPUT-POINTER #:STREAM25))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; (CL+SSL::BUFFER-LENGTH CL+SSL::BUF)
; --> BLOCK
; ==>
; (LENGTH CL+SSL::BUF)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (CL+SSL::B/S-REPLACE CL+SSL::BUF CL+SSL::SEQ :START2 CL+SSL::START)
; --> BLOCK
; ==>
; (REPLACE CL+SSL::BUF CL+SSL::SEQ :START1 CL+SSL::START1 :END1 CL+SSL::END1
; :START2 CL+SSL::START2 :END2 CL+SSL::END2)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES
; (SIMPLE-ARRAY * (*))
; &REST T).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a SIMPLE-BASE-STRING.
; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)).
; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES SIMPLE-BASE-STRING
; &REST T).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)).
; The second argument is a SEQUENCE, not a SIMPLE-BASE-STRING.
; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES
; (SIMPLE-ARRAY CHARACTER
; (*))
; &REST T).
; (- CL+SSL::END CL+SSL::START)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a T, not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &REST T).
; etc.
; (+ (- CL+SSL::END CL+SSL::START) (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The second argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &REST T).
; etc.
; (>
; (+ (- CL+SSL::END CL+SSL::START) (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM))
; (CL+SSL::BUFFER-LENGTH CL+SSL::BUF))
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a NUMBER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a NUMBER, not a (UNSIGNED-BYTE 32).
; etc.
; (- CL+SSL::END CL+SSL::START)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The second argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &REST T).
; etc.
; (> (- CL+SSL::END CL+SSL::START) (CL+SSL::BUFFER-LENGTH CL+SSL::BUF))
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a NUMBER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a NUMBER, not a (UNSIGNED-BYTE 32).
; etc.
; (INCF (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM)
; (- CL+SSL::END CL+SSL::START))
; ==>
; (+ (- CL+SSL::END CL+SSL::START)
; (CL+SSL::SSL-STREAM-OUTPUT-POINTER #:STREAM25))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
; 32).
; The second argument is a T, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (INCF CL+SSL::START (CL+SSL::BUFFER-LENGTH CL+SSL::BUF))
;
; note: doing signed word to integer coercion (cost 20) to START
; processing (DEFMETHOD STREAM-FINISH-OUTPUT ...)
; processing (DEFMETHOD STREAM-FORCE-OUTPUT ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/streams.lisp
; in: DEFMETHOD STREAM-FORCE-OUTPUT (SSL-STREAM)
; (PLUSP CL+SSL::FILL-PTR)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a T, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a T, not a FIXNUM.
; etc.
; (CL+SSL::ENSURE-SSL-FUNCALL STREAM CL+SSL::HANDLE #'CL+SSL::SSL-WRITE
; CL+SSL::HANDLE CL+SSL::PTR CL+SSL::FILL-PTR)
; --> BLOCK LOOP BLOCK TAGBODY PROGN
; ==>
; (LET ((CL+SSL::NBYTES
; (LET (#)
; (APPLY CL+SSL::FUNC CL+SSL::ARGS))))
; (WHEN (PLUSP CL+SSL::NBYTES) (RETURN CL+SSL::NBYTES))
; (LET ((ERROR (CL+SSL::SSL-GET-ERROR CL+SSL::HANDLE CL+SSL::NBYTES)))
; (CASE ERROR
; (2 (CL+SSL::INPUT-WAIT STREAM # #))
; (3 (CL+SSL::OUTPUT-WAIT STREAM # #))
; (T
; (CL+SSL::SSL-SIGNAL-ERROR CL+SSL::HANDLE CL+SSL::FUNC ERROR
; CL+SSL::NBYTES)))))
;
; note: doing signed word to integer coercion (cost 20) to NBYTES
; processing (DEFUN INSTALL-NONBLOCK-FLAG ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/streams.lisp
; in: DEFUN INSTALL-NONBLOCK-FLAG
; (DEFUN CL+SSL::INSTALL-NONBLOCK-FLAG (CL+SSL::FD)
; (SB-POSIX:FCNTL CL+SSL::FD SB-POSIX:F-SETFL
; (LOGIOR (SB-POSIX:FCNTL CL+SSL::FD SB-POSIX:F-GETFL)
; SB-POSIX:O-NONBLOCK)))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::INSTALL-NONBLOCK-FLAG
; (CL+SSL::FD)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::INSTALL-NONBLOCK-FLAG
; (SB-POSIX:FCNTL CL+SSL::FD SB-POSIX:F-SETFL
; (LOGIOR (SB-POSIX:FCNTL CL+SSL::FD SB-POSIX:F-GETFL)
; SB-POSIX:O-NONBLOCK))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFUN INSTALL-HANDLE-AND-BIO ...)
; processing (DEFUN INSTALL-KEY-AND-CERT ...)
; processing (DEFUN X509-CERTIFICATE-NAMES ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/streams.lisp
; in: DEFUN X509-CERTIFICATE-NAMES
; (CFFI-SYS:NULL-POINTER-P CL+SSL::X509-CERTIFICATE)
; --> BLOCK ZEROP
; ==>
; 1
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first argument of IF-EQ
; (CFFI-SYS:WITH-FOREIGN-POINTER (CL+SSL::BUF 1024)
; (LET ((CL+SSL::ISSUER-NAME
; (CL+SSL::X509-GET-ISSUER-NAME CL+SSL::X509-CERTIFICATE))
; (CL+SSL::SUBJECT-NAME
; (CL+SSL::X509-GET-SUBJECT-NAME CL+SSL::X509-CERTIFICATE)))
; (VALUES
; (UNLESS (CFFI-SYS:NULL-POINTER-P CL+SSL::ISSUER-NAME)
; (CL+SSL::X509-NAME-ONELINE CL+SSL::ISSUER-NAME CL+SSL::BUF 1024)
; (CFFI:FOREIGN-STRING-TO-LISP CL+SSL::BUF))
; (UNLESS (CFFI-SYS:NULL-POINTER-P CL+SSL::SUBJECT-NAME)
; (CL+SSL::X509-NAME-ONELINE CL+SSL::SUBJECT-NAME CL+SSL::BUF 1024)
; (CFFI:FOREIGN-STRING-TO-LISP CL+SSL::BUF)))))
; --> SYMBOL-MACROLET SYMBOL-MACROLET LET LET SB-C::RESTORING-NSP LET
; --> SB-ALIEN-INTERNALS:MAKE-LOCAL-ALIEN
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20), for:
; the first result of ALLOC-NUMBER-STACK-SPACE
; (CFFI-SYS:NULL-POINTER-P CL+SSL::ISSUER-NAME)
; --> ZEROP
; ==>
; 1
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first argument of IF-EQ
; (CFFI-SYS:NULL-POINTER-P CL+SSL::SUBJECT-NAME)
; --> ZEROP
; ==>
; 1
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first argument of IF-EQ
; processing (DEFMETHOD SSL-STREAM-HANDLE ...)
; processing (DEFUN SSL-STREAM-X509-CERTIFICATE ...)
; processing (DEFUN SSL-LOAD-GLOBAL-VERIFY-LOCATIONS ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/streams.lisp
; in: DEFUN SSL-LOAD-GLOBAL-VERIFY-LOCATIONS
; (CL+SSL::SSL-CTX-LOAD-VERIFY-LOCATIONS CL+SSL::*SSL-GLOBAL-CONTEXT*
; CL+SSL::CAFILE (CFFI-SYS:NULL-POINTER))
;
; note: doing SAP to pointer coercion (cost 20)
; processing (DEFUN SSL-SET-GLOBAL-DEFAULT-VERIFY-PATHS ...)
; processing (DEFUN SSL-CHECK-VERIFY-P ...)
; processing (DEFUN (SETF SSL-CHECK-VERIFY-P) ...)
; processing (DEFUN SSL-VERIFY-INIT ...)
; processing (DEFUN MAYBE-VERIFY-CLIENT-STREAM ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/streams.lisp
; in: DEFUN MAYBE-VERIFY-CLIENT-STREAM
; (CFFI-SYS:NULL-POINTER-P CL+SSL::SRV-CERT)
; --> ZEROP
; ==>
; 1
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first argument of IF-EQ
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first argument of IF-EQ
; --> BLOCK ZEROP
; ==>
; 1
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first argument of IF-EQ
; processing (DEFUN HANDLE-EXTERNAL-FORMAT ...)
; processing (DEFMACRO WITH-NEW-SSL ...)
; processing (DEFVAR *MAKE-SSL-CLIENT-STREAM-VERIFY-DEFAULT* ...)
; processing (DEFUN MAKE-SSL-CLIENT-STREAM ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/streams.lisp
; in: DEFUN MAKE-SSL-CLIENT-STREAM
; (ZEROP (CL+SSL::SSL-SET-CIPHER-LIST CL+SSL::HANDLE CL+SSL::CIPHER-LIST))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
; (CL+SSL::WITH-NEW-SSL
; (CL+SSL::HANDLE)
; (IF CL+SSL::HOSTNAME
; (CFFI:WITH-FOREIGN-STRING (CL+SSL::CHOSTNAME CL+SSL::HOSTNAME)
; (CL+SSL::SSL-SET-TLSEXT-HOST-NAME CL+SSL::HANDLE CL+SSL::CHOSTNAME)))
; (SETF CL+SSL::SOCKET
; (CL+SSL::INSTALL-HANDLE-AND-BIO STREAM CL+SSL::HANDLE
; CL+SSL::SOCKET CL+SSL::UNWRAP-STREAM-P))
; (CL+SSL::SSL-SET-CONNECT-STATE CL+SSL::HANDLE)
; (WHEN
; (ZEROP
; (CL+SSL::SSL-SET-CIPHER-LIST CL+SSL::HANDLE CL+SSL::CIPHER-LIST))
; (ERROR 'CL+SSL:SSL-ERROR-INITIALIZE :REASON "Can't set SSL cipher list"))
; (CL+SSL:WITH-PEM-PASSWORD
; (CL+SSL::PASSWORD)
; (CL+SSL::INSTALL-KEY-AND-CERT CL+SSL::HANDLE CL+SSL::KEY
; CL+SSL::CERTIFICATE))
; (CL+SSL::ENSURE-SSL-FUNCALL STREAM CL+SSL::HANDLE #'CL+SSL::SSL-CONNECT
; CL+SSL::HANDLE)
; (CL+SSL::MAYBE-VERIFY-CLIENT-STREAM STREAM CL+SSL::VERIFY CL+SSL::HOSTNAME)
; (CL+SSL::HANDLE-EXTERNAL-FORMAT STREAM CL+SSL::EXTERNAL-FORMAT))
; --> WHEN IF CFFI-SYS:NULL-POINTER-P BLOCK ZEROP
; ==>
; 1
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first argument of IF-EQ
; (CL+SSL::ENSURE-SSL-FUNCALL STREAM CL+SSL::HANDLE #'CL+SSL::SSL-CONNECT
; CL+SSL::HANDLE)
; --> BLOCK LOOP BLOCK TAGBODY PROGN
; ==>
; (LET ((CL+SSL::NBYTES
; (LET (#)
; (APPLY CL+SSL::FUNC CL+SSL::ARGS))))
; (WHEN (PLUSP CL+SSL::NBYTES) (RETURN CL+SSL::NBYTES))
; (LET ((ERROR (CL+SSL::SSL-GET-ERROR CL+SSL::HANDLE CL+SSL::NBYTES)))
; (CASE ERROR
; (2 (CL+SSL::INPUT-WAIT STREAM # #))
; (3 (CL+SSL::OUTPUT-WAIT STREAM # #))
; (T
; (CL+SSL::SSL-SIGNAL-ERROR CL+SSL::HANDLE CL+SSL::FUNC ERROR
; CL+SSL::NBYTES)))))
;
; note: doing signed word to integer coercion (cost 20) to NBYTES
; processing (DEFUN MAKE-SSL-SERVER-STREAM ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/streams.lisp
; in: DEFUN MAKE-SSL-SERVER-STREAM
; (ZEROP (CL+SSL::SSL-SET-CIPHER-LIST CL+SSL::HANDLE CL+SSL::CIPHER-LIST))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
; (CL+SSL::WITH-NEW-SSL
; (CL+SSL::HANDLE)
; (SETF CL+SSL::SOCKET
; (CL+SSL::INSTALL-HANDLE-AND-BIO STREAM CL+SSL::HANDLE
; CL+SSL::SOCKET CL+SSL::UNWRAP-STREAM-P))
; (CL+SSL::SSL-SET-ACCEPT-STATE CL+SSL::HANDLE)
; (WHEN
; (ZEROP
; (CL+SSL::SSL-SET-CIPHER-LIST CL+SSL::HANDLE CL+SSL::CIPHER-LIST))
; (ERROR 'CL+SSL:SSL-ERROR-INITIALIZE :REASON "Can't set SSL cipher list"))
; (CL+SSL:WITH-PEM-PASSWORD
; (CL+SSL::PASSWORD)
; (CL+SSL::INSTALL-KEY-AND-CERT CL+SSL::HANDLE CL+SSL::KEY
; CL+SSL::CERTIFICATE))
; (CL+SSL::ENSURE-SSL-FUNCALL STREAM CL+SSL::HANDLE #'CL+SSL::SSL-ACCEPT
; CL+SSL::HANDLE)
; (CL+SSL::HANDLE-EXTERNAL-FORMAT STREAM CL+SSL::EXTERNAL-FORMAT))
; --> WHEN IF CFFI-SYS:NULL-POINTER-P BLOCK ZEROP
; ==>
; 1
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first argument of IF-EQ
; (CL+SSL::ENSURE-SSL-FUNCALL STREAM CL+SSL::HANDLE #'CL+SSL::SSL-ACCEPT
; CL+SSL::HANDLE)
; --> BLOCK LOOP BLOCK TAGBODY PROGN
; ==>
; (LET ((CL+SSL::NBYTES
; (LET (#)
; (APPLY CL+SSL::FUNC CL+SSL::ARGS))))
; (WHEN (PLUSP CL+SSL::NBYTES) (RETURN CL+SSL::NBYTES))
; (LET ((ERROR (CL+SSL::SSL-GET-ERROR CL+SSL::HANDLE CL+SSL::NBYTES)))
; (CASE ERROR
; (2 (CL+SSL::INPUT-WAIT STREAM # #))
; (3 (CL+SSL::OUTPUT-WAIT STREAM # #))
; (T
; (CL+SSL::SSL-SIGNAL-ERROR CL+SSL::HANDLE CL+SSL::FUNC ERROR
; CL+SSL::NBYTES)))))
;
; note: doing signed word to integer coercion (cost 20) to NBYTES
; processing (DEFGENERIC STREAM-FD ...)
; processing (DEFMETHOD STREAM-FD ...)
; processing (DEFMETHOD STREAM-FD ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl+ssl/src/streams-tmpMFQG7214.fasl
; compilation finished in 0:00:00.808
; compiling file "/usr/share/common-lisp/source/cl+ssl/src/bio.lisp" (written 09 JUN 2020 04:49:50 PM):
; processing (IN-PACKAGE CL+SSL)
; processing (DEFCONSTANT +BIO-TYPE-SOCKET+ ...)
; processing (DEFCONSTANT +BIO_FLAGS_READ+ ...)
; processing (DEFCONSTANT +BIO_FLAGS_WRITE+ ...)
; processing (DEFCONSTANT +BIO_FLAGS_SHOULD_RETRY+ ...)
; processing (DEFCONSTANT +BIO_CTRL_FLUSH+ ...)
; processing (CFFI:DEFCSTRUCT BIO-METHOD ...)
; processing (CFFI:DEFCSTRUCT BIO ...)
; processing (DEFUN MAKE-BIO-LISP-METHOD ...)
; processing (DEFUN BIO-NEW-LISP ...)
; processing (CFFI:DEFCALLBACK LISP-WRITE ...)
; processing (DEFUN CLEAR-RETRY-FLAGS ...)
; processing (DEFUN SET-RETRY-READ ...)
; processing (CFFI:DEFCALLBACK LISP-READ ...)
; processing (CFFI:DEFCALLBACK LISP-PUTS ...)
; processing (CFFI:DEFCALLBACK LISP-CTRL ...)
; processing (CFFI:DEFCALLBACK LISP-CREATE ...)
; processing (CFFI:DEFCALLBACK LISP-DESTROY ...)
; processing (SETF *BIO-LISP-METHOD* ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl+ssl/src/bio-tmpEL1UBVEC.fasl
; compilation finished in 0:00:00.316
; compiling file "/usr/share/common-lisp/source/cl+ssl/src/random.lisp" (written 09 JUN 2020 04:49:50 PM):
; processing (IN-PACKAGE :CL+SSL)
; processing (DEFUN RANDOM-BYTES ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl+ssl/src/random-tmpO7N5WXBL.fasl
; compilation finished in 0:00:00.056
; compiling file "/usr/share/common-lisp/source/cl+ssl/src/context.lisp" (written 09 JUN 2020 04:49:50 PM):
; processing (IN-PACKAGE :CL+SSL)
; processing (DEFINE-CONDITION VERIFY-LOCATION-NOT-FOUND-ERROR ...)
; processing (DEFUN VALIDATE-VERIFY-LOCATION ...)
; processing (DEFUN ADD-VERIFY-LOCATIONS ...)
; processing (DEFUN SSL-CTX-SET-VERIFY-LOCATION ...)
; processing (ALEXANDRIA:DEFINE-CONSTANT +DEFAULT-CIPHER-LIST+ ...)
; processing (CFFI:DEFCALLBACK VERIFY-PEER-CALLBACK ...)
; processing (DEFUN MAKE-CONTEXT ...)
; processing (DEFUN CALL-WITH-GLOBAL-CONTEXT ...)
; processing (DEFMACRO WITH-GLOBAL-CONTEXT ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl+ssl/src/context-tmp7GPJW3WR.fasl
; compilation finished in 0:00:00.148
; compiling file "/usr/share/common-lisp/source/cl+ssl/src/verify-hostname.lisp" (written 09 JUN 2020 04:49:50 PM):
; processing (IN-PACKAGE :CL+SSL)
; processing (DEFINE-CONDITION HOSTNAME-VERIFICATION-ERROR ...)
; processing (DEFINE-CONDITION UNABLE-TO-MATCH-ALTNAMES ...)
; processing (DEFINE-CONDITION UNABLE-TO-DECODE-COMMON-NAME ...)
; processing (DEFINE-CONDITION UNABLE-TO-MATCH-COMMON-NAME ...)
; processing (DEFUN CASE-INSENSITIVE-MATCH ...)
; processing (DEFUN REMOVE-TRAILING-DOT ...)
; processing (DEFUN CHECK-WILDCARD-IN-LEFTMOST-LABEL ...)
; processing (DEFUN CHECK-SINGLE-WILDCARD ...)
; processing (DEFUN CHECK-TWO-LABELS-AFTER-WILDCARD ...)
; processing (DEFUN VALIDATE-AND-PARSE-WILDCARD-IDENTIFIER ...)
; processing (DEFUN WILDCARD-NOT-IN-A-LABEL ...)
; processing (DEFUN TRY-MATCH-WILDCARD ...)
; processing (DEFUN MAYBE-TRY-MATCH-WILDCARD ...)
; processing (DEFUN TRY-MATCH-HOSTNAME ...)
; processing (DEFUN TRY-MATCH-HOSTNAMES ...)
; processing (DEFUN MAYBE-CHECK-SUBJECT-CN ...)
; processing (DEFUN VERIFY-HOSTNAME ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl+ssl/src/verify-hostname-tmpESZVJLGB.fasl
; compilation finished in 0:00:00.100
; file: /usr/share/common-lisp/source/bordeaux-threads/src/default-implementations.lisp
; in: BORDEAUX-THREADS::DEFDFUN BORDEAUX-THREADS:SEMAPHORE-P
; 'BORDEAUX-THREADS:SEMAPHORE
;
; caught STYLE-WARNING:
; undefined type: BORDEAUX-THREADS:SEMAPHORE
;
; compilation unit finished
; Undefined type:
; BORDEAUX-THREADS:SEMAPHORE
; caught 7 STYLE-WARNING conditions
; printed 1992 notes
;; loading system "mssql"
; compiling file "/usr/share/common-lisp/source/iterate/package.lisp" (written 04 NOV 2021 03:10:48 PM):
; processing (DEFPACKAGE #:ITERATE ...)
; processing (IN-PACKAGE #:ITERATE)
; processing (DEFMACRO DEFCONST ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/iterate/package-tmp861VENRV.fasl
; compilation finished in 0:00:00.028
; compiling file "/usr/share/common-lisp/source/iterate/iterate.lisp" (written 04 NOV 2021 03:10:56 PM):
; processing (IN-PACKAGE #:ITERATE)
; processing (DECLAIM (DECLARATION DECLARE-VARIABLES))
; processing (DEFCONST VERSION ...)
; processing (DEFCONST STANDARD-TYPE-SYMBOLS ...)
; processing (DEFVAR *ALWAYS-DECLARE-VARIABLES* ...)
; processing (DEFVAR *RESULT-VAR*)
; processing (DEFVAR *TYPE-ALIST*)
; processing (DEFVAR *DECLARE-VARIABLES*)
; processing (DEFVAR *CLAUSE*)
; processing (DEFVAR *TOP-LEVEL?*)
; processing (DEFVAR *BINDING-CONTEXT?*)
; processing (DEFVAR *BINDINGS*)
; processing (DEFVAR *INTERNAL-VARIABLES*)
; processing (DEFVAR *DECLARATIONS*)
; processing (DEFVAR *ACCUM-VAR-ALIST*)
; processing (DEFVAR *SHARED-BINDINGS-ALIST*)
; processing (DEFVAR *BLOCK-NAME*)
; processing (DEFVAR *LOOP-NAME*)
; processing (DEFVAR *CLAUSE-INFO-INDEX* ...)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL) ...)
; processing (DEFPARAMETER *SPECIAL-FORM-ALIST* ...)
; processing (DEFVAR *SPECIAL-CLAUSE-ALIST* ...)
; processing (DEFVAR *TEMPS*)
; processing (DEFVAR *TEMPS-IN-USE*)
; processing (DEFVAR *ENV*)
; processing (DEFVAR *DRIVER-INFO-ALIST*)
; processing (DEFVAR *PREVIOUS-VARS-ALIST*)
; processing (DEFVAR *LOOP-TOP*)
; processing (DEFVAR *LOOP-STEP*)
; processing (DEFVAR *LOOP-END*)
; processing (DEFVAR *LOOP-STEP-USED?*)
; processing (DEFVAR *LOOP-END-USED?*)
; processing (DEFVAR *LOOP-BODY-WRAPPERS*)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :EXECUTE) ...)
; processing (DEFMACRO ITERATE ...)
; processing (DEFMACRO ITER ...)
; processing (DEFMACRO DEFMACRO-CLAUSE ...)
; processing (DEFMACRO DEFMACRO-DRIVER ...)
; processing (DEFUN PROCESS-TOP-LEVEL-DECLS ...)
; processing (DEFUN DEFAULT-DRIVER-CODE ...)
; processing (DEFUN WRAP-FORM ...)
; processing (DEFUN ADD-LOOP-BODY-WRAPPER ...)
; processing (DEFUN WALK ...)
; processing (DEFUN WALK-LIST ...)
; processing (DEFUN WALK-ARGLIST ...)
; processing (DEFUN WALK-FSPEC ...)
; processing (DEFUN WALK-LIST-NCONCING ...)
; processing (DEFUN RETURN-CODE-MODIFYING-BODY ...)
; processing (DEFUN ADD-INTERNAL-VAR ...)
; processing (DEFUN ADD-INTERNAL-VARS ...)
; processing (DEFUN LAMBDA-LIST-VARS ...)
; processing (DEFUN SPECIAL-FORM? ...)
; processing (DEFUN WALK-SPECIAL-FORM ...)
; processing (DEFUN WALK-CDR ...)
; processing (DEFUN WALK-CDDR ...)
; processing (DEFUN WALK-PROGN ...)
; processing (DEFUN WALK-SETQ ...)
; processing (DEFUN WALK-FUNCTION ...)
; processing (DEFUN WALK-DECLARE ...)
; processing (DEFUN WALK-LET ...)
; processing (DEFUN WALK-LET-BINDINGS ...)
; processing (DEFUN WALK-LET*-BINDINGS ...)
; processing (DEFUN WALK-LET-BINDING ...)
; processing (DEFUN WALK-MULTIPLE-VALUE-BIND ...)
; processing (DEFUN WALK-FLET ...)
; processing (DEFUN WALK-CDR-WITH-DECLARATIONS ...)
; processing (DEFUN WALK-CDDR-WITH-DECLARATIONS ...)
; processing (DEFUN WALK-TAGBODY ...)
; processing (DEFUN WALK-MACROLET ...)
; processing (DEFVAR *INITIAL*)
; processing (DEFVAR *DECLS*)
; processing (DEFVAR *STEP*)
; processing (DEFVAR *FINAL*)
; processing (DEFVAR *FINALP*)
; processing (DEFUN PROCESS-CLAUSE ...)
; processing (DEFUN APPLY-CLAUSE-FUNCTION ...)
; processing (DEFUN PREPROCESS-CLAUSE ...)
; processing (DEFUN SYMBOL-SYNONYM ...)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...)
; processing (DEFUN ARG-CHECK ...)
; processing (DEFUN WALK-EXPR ...)
; processing (DEFUN DISPLAY-ITERATE-CLAUSES ...)
; processing (DEFUN DISP-STD-CLAUSES ...)
; processing (DEFUN DISPLAY-CLAUSE ...)
; processing (DEFCONST FILL-COL ...)
; processing (DEFUN DISPLAY-KWS ...)
; processing (DEFUN CLAUSE-MATCHES? ...)
; processing (DEFUN GET-CLAUSE-INFO ...)
; processing (DEFUN IS-ITERATE-CLAUSE? ...)
; processing (DEFUN STARTS-CLAUSE? ...)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...)
; processing (DEFUN DISPLAY-INDEX ...)
; processing (DEFUN REMOVE-CLAUSE ...)
; processing (DEFMACRO DEFCLAUSE ...)
; processing (DEFMACRO DEFCLAUSE-DRIVER ...)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...)
; processing (DEFMACRO DEFSYNONYM ...)
; processing (DEFMACRO DEFCLAUSE-SEQUENCE ...)
; processing (DEFUN IF-1ST-TIME ...)
; processing (DEFMACRO WITH-TEMPORARY ...)
; processing (DEFUN GET-FREE-TEMP ...)
; processing (DEFUN VAR-TYPE ...)
; processing (DEFUN VAR-DECLARATION ...)
; processing (DEFUN EXPR-TYPE-ONLY ...)
; processing (DEFUN EXPRESSION-TYPE ...)
; processing (DEFUN QUOTED? ...)
; processing (DEFUN FUNCTION-QUOTED? ...)
; processing (DEFUN LAMBDA-EXPRESSION? ...)
; processing (DEFUN THE-EXPRESSION? ...)
; processing (DEFUN SELF-EVALUATING? ...)
; processing (DEFUN CONSTANT? ...)
; processing (DEFUN DUPLICABLE? ...)
; processing (DEFUN VAR-SPEC? ...)
; processing (DEFUN EXTRACT-VAR ...)
; processing (DEFUN MAKE-BINDING ...)
; processing (DEFUN MAKE-DEFAULT-BINDING ...)
; processing (DEFUN MAKE-VAR-AND-BINDING ...)
; processing (DEFUN MAKE-VAR-AND-DEFAULT-BINDING ...)
; processing (DEFUN MAKE-ACCUM-VAR-BINDING ...)
; processing (DEFUN MAKE-ACCUM-VAR-DEFAULT-BINDING ...)
; processing (DEFUN MAKE-ACCUM-VAR-BINDING-INTERNAL ...)
; processing (DEFUN MAKE-SHARED-BINDING ...)
; processing (DEFUN MAKE-BINDING-INTERNAL ...)
; processing (DEFUN MAKE-INITIAL-VALUE ...)
; processing (DEFUN ADD-BINDING ...)
; processing (DEFUN CHECK-INTERNAL-VARIABLES ...)
; processing (DEFUN INTERNAL-VARIABLE? ...)
; processing (DEFUN VAR-BINDING ...)
; processing (DEFUN MAKE-DESTRUCTURING-BINDINGS ...)
; processing (DEFUN DO-DESTRUCTURING-BINDINGS ...)
; processing (DEFUN EXTRACT-VARS ...)
; processing (DEFMACRO DSETQ ...)
; processing (DEFUN DO-DSETQ ...)
; processing (DEFUN MAKE-DSETQS ...)
; processing (DEFUN MAKE-MV-DSETQS ...)
; processing (DEFUN DSETQ-ERROR ...)
; processing (DEFUN IN-ITERATE? ...)
; processing (DEFUN LOCAL-BINDING-CHECK ...)
; processing (DEFUN FREE-VARIABLES ...)
; processing (DEFUN FREE-VARS ...)
; processing (DEFUN FREE-VARS-LIST ...)
; processing (DEFUN FREE-VARS-FSPEC ...)
; processing (DEFUN RETURN-CODE ...)
; processing (DEFMACRO RETURN-DRIVER-CODE ...)
; processing (DEFUN ADD-DRIVER-INFO ...)
; processing (DEFMACRO RETURN-SEQUENCE-CODE ...)
; processing (DEFUN RETURN-SEQ-CODE ...)
; processing (DEFUN CHECK-SEQUENCE-KEYWORDS ...)
; processing (DEFUN EVAL-CONST-EXPR ...)
; processing (DEFUN MAKE-FUNCALL ...)
; processing (DEFUN MAKE-APPLICATION ...)
; processing (DEFUN APPLY-SUBST-EXPR ...)
; processing (DEFMACRO DEF-SPECIAL-CLAUSE ...)
; processing (DEFUN INSTALL-SPECIAL-CLAUSE-FUNCTION ...)
; processing (DEF-SPECIAL-CLAUSE INITIALLY ...)
; processing (DEF-SPECIAL-CLAUSE AFTER-EACH ...)
; processing (DEF-SPECIAL-CLAUSE ELSE ...)
; processing (DEF-SPECIAL-CLAUSE FINALLY ...)
; processing (DEF-SPECIAL-CLAUSE FINALLY-PROTECTED ...)
; processing (DEF-SPECIAL-CLAUSE IF-FIRST-TIME ...)
; processing (DEF-SPECIAL-CLAUSE FIRST-TIME-P ...)
; processing (DEF-SPECIAL-CLAUSE FIRST-ITERATION-P ...)
; processing (DEF-SPECIAL-CLAUSE IN ...)
; processing (DEF-SPECIAL-CLAUSE NEXT ...)
; processing (DEFUN MAKE-NEXT-CODE ...)
; processing (DEFUN VAR-VALUE-RETURNED ...)
; processing (DEFSYNONYM AS ...)
; processing (DEFSYNONYM GENERATING ...)
; processing (DEFCLAUSE (REPEAT N) ...)
; processing (DEFCLAUSE-DRIVER (FOR VAR-SPEC ...) ...)
; processing (DEFCLAUSE-DRIVER (FOR VAR ...) ...)
; processing (DEFCLAUSE-DRIVER (FOR VAR ...) ...)
; processing (DEFUN GENERATE-FUNCTION-STEP-CODE ...)
; processing (DEFCLAUSE-SEQUENCE IN-VECTOR ...)
; processing (DEFCLAUSE-SEQUENCE IN-SEQUENCE ...)
; processing (DEFCLAUSE-SEQUENCE IN-STRING ...)
; processing (DEFCLAUSE-DRIVER (FOR KEY-VAL-VARS ...) ...)
; processing (DEFCLAUSE-DRIVER (FOR SYM-ACCESS-PKG-VARS ...) ...)
; processing (DEFMACRO-DRIVER (FOR VAR ...) ...)
; processing (DEFCLAUSE-DRIVER (FOR VAR ...) ...)
; processing (DEFCLAUSE-DRIVER (FOR VAR ...) ...)
; processing (DEFUN RETURN-STREAM-DRIVER-CODE ...)
; processing (DEFCLAUSE-DRIVER (FOR VAR ...) ...)
; processing (DEFCLAUSE-DRIVER (FOR VAR ...) ...)
; processing (DEFCLAUSE (WITH VAR ...) ...)
; processing (DEFCLAUSE (FOR VAR ...) ...)
; processing (DEFCLAUSE (FOR VAR ...) ...)
; processing (DEFCLAUSE (FOR VAR ...) ...)
; processing (DEFUN RETURN-REDUCTION-CODE ...)
; processing (DEFSYNONYM COUNT ...)
; processing (DEFCLAUSE (COUNTING EXPR ...) ...)
; processing (DEFCLAUSE (SUM EXPR ...) ...)
; processing (DEFSYNONYM SUMMING ...)
; processing (DEFCLAUSE (MULTIPLY EXPR ...) ...)
; processing (DEFSYNONYM MULTIPLYING ...)
; processing (DEFCLAUSE (REDUCING EXPR ...) ...)
; processing (DEFCLAUSE (MAXIMIZE EXPR ...) ...)
; processing (DEFSYNONYM MAXIMIZING ...)
; processing (DEFCLAUSE (MINIMIZE EXPR ...) ...)
; processing (DEFSYNONYM MINIMIZING ...)
; processing (DEFUN RETURN-EXTREMUM-CODE ...)
; processing (DEFMACRO FINISH ...)
; processing (DEFMACRO TERMINATE ...)
; processing (DEFMACRO NEXT-ITERATION ...)
; processing (DEFMACRO LEAVE ...)
; processing (DEFCLAUSE (WHILE EXPR) ...)
; processing (DEFCLAUSE (UNTIL EXPR) ...)
; processing (DEFCLAUSE (ALWAYS EXPR) ...)
; processing (DEFCLAUSE (NEVER EXPR) ...)
; processing (DEFCLAUSE (THEREIS EXPR) ...)
; processing (DEFCLAUSE (FINDING EXPR ...) ...)
; processing (DEFCLAUSE (FINDING EXPR ...) ...)
; processing (DEFCLAUSE (FINDING EXPR ...) ...)
; processing (DEFUN RETURN-FIND-EXTREMUM-CODE ...)
; processing (DEFUN RETURN-COLLECTION-CODE ...)
; processing (DEFCLAUSE (COLLECT EXPR ...) ...)
; processing (DEFSYNONYM COLLECTING ...)
; processing (DEFCLAUSE (ADJOINING EXPR ...) ...)
; processing (DEFCLAUSE (NCONCING EXPR ...) ...)
; processing (DEFCLAUSE (APPENDING EXPR ...) ...)
; processing (DEFCLAUSE (UNIONING EXPR ...) ...)
; processing (DEFCLAUSE (NUNIONING EXPR ...) ...)
; processing (DEFCLAUSE (ACCUMULATE EXPR ...) ...)
; processing (DEFSYNONYM ACCUMULATING ...)
; processing (DEFCLAUSE (FOR PVAR-SPEC ...) ...)
; processing (DEFUN REGISTER-PREVIOUS-CODE ...)
; processing (DEFUN INTERN-PREVIOUS-INFO ...)
; processing (DEFUN IS-SAVE-VAR ...)
; processing (DEFUN MAKE-SAVE-VARS ...)
; processing (DEFUN INSERT-PREVIOUS-CODE ...)
; processing (DEFUN DO-EXTRA-SAVE-VAR-HACK ...)
; processing (DEFUN MAKE-POST-SAVE-VAR ...)
; processing (DEFUN MAKE-PREV-CODE ...)
; processing (DEFUN MAKE-SAVE-PREVIOUS-CODE ...)
; processing (DEFUN SPLICE-IN-CODE ...)
; processing (DEFUN ADD-PROGN ...)
; processing (DEFUN AT-TOP-LEVEL? ...)
; processing (DEFUN TOP-LEVEL-CHECK ...)
; processing (DEFUN PROGNIFY ...)
; processing (DEFUN CLAUSE-ERROR ...)
; processing (DEFUN CLAUSE-WARNING ...)
; processing (DEFUN BUG ...)
; processing (DEFVAR *GENVAR-COUNTER* ...)
; processing (DEFUN GENVAR ...)
; processing (DEFUN SYMBOL-APPEND ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/iterate/iterate-tmp7MX18LSW.fasl
; compilation finished in 0:00:05.044
; compiling file "/usr/share/common-lisp/source/garbage-pools/garbage-pools.lisp" (written 17 APR 2013 09:15:14 PM):
; processing (DEFPACKAGE :GARBAGE-POOLS ...)
; processing (IN-PACKAGE #:GARBAGE-POOLS)
; processing (DEFVAR *POOL*)
; processing (DEFCLASS POOL ...)
; processing (DEFUN CLEANUP-REGISTER ...)
; processing (DEFUN CLEANUP-POOL ...)
; processing (DEFUN CLEANUP-OBJECT ...)
; processing (DEFUN CANCEL-OBJECT-CLEANUP ...)
; processing (DEFMACRO WITH-GARBAGE-POOL ...)
; processing (DEFGENERIC OBJECT-REGISTER ...)
; processing (DEFMETHOD OBJECT-REGISTER ...)
; processing (DEFMACRO DEFCLEANUP ...)
; processing (DEFCLEANUP POOL ...)
; processing (DEFCLEANUP STREAM ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/garbage-pools/garbage-pools-tmp4CP5SEFX.fasl
; compilation finished in 0:00:00.100
; compiling file "/usr/share/common-lisp/source/parse-number/parse-number.lisp" (written 31 OCT 2017 08:17:56 AM):
; processing (DEFPACKAGE #:ORG.MAPCAR.PARSE-NUMBER ...)
; processing (IN-PACKAGE #:ORG.MAPCAR.PARSE-NUMBER)
; processing (DEFINE-CONDITION INVALID-NUMBER ...)
; processing (DECLAIM (TYPE CONS ...))
; processing (DEFPARAMETER *WHITE-SPACE-CHARACTERS* ...)
; processing (DECLAIM (INLINE WHITE-SPACE-P))
; processing (DEFUN WHITE-SPACE-P ...)
; processing (DECLAIM (INLINE PARSE-INTEGER-AND-PLACES))
; processing (DEFUN PARSE-INTEGER-AND-PLACES ...)
; file: /usr/share/common-lisp/source/parse-number/parse-number.lisp
; in: DEFUN PARSE-INTEGER-AND-PLACES
; (CHAR STRING ORG.MAPCAR.PARSE-NUMBER::POS)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (CONS INTEGER ORG.MAPCAR.PARSE-NUMBER::RELEVANT-DIGITS)
;
; note: doing signed word to integer coercion (cost 20)
; processing (DEFUN PARSE-INTEGERS ...)
; file: /usr/share/common-lisp/source/parse-number/parse-number.lisp
; in: DEFUN PARSE-INTEGERS
; (ORG.MAPCAR.PARSE-NUMBER::PARSE-INTEGER-AND-PLACES STRING
; ORG.MAPCAR.PARSE-NUMBER::LEFT ORG.MAPCAR.PARSE-NUMBER::END :RADIX
; ORG.MAPCAR.PARSE-NUMBER::RADIX)
; --> BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION LET -
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (ORG.MAPCAR.PARSE-NUMBER::PARSE-INTEGER-AND-PLACES STRING
; ORG.MAPCAR.PARSE-NUMBER::LEFT ORG.MAPCAR.PARSE-NUMBER::RIGHT :RADIX
; ORG.MAPCAR.PARSE-NUMBER::RADIX)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
;
; note: doing signed word to integer coercion (cost 20)
; (ORG.MAPCAR.PARSE-NUMBER::PARSE-INTEGER-AND-PLACES STRING
; ORG.MAPCAR.PARSE-NUMBER::LEFT ORG.MAPCAR.PARSE-NUMBER::END :RADIX
; ORG.MAPCAR.PARSE-NUMBER::RADIX)
; --> BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION LET CONS
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20)
; processing (DECLAIM (INLINE NUMBER-VALUE ...))
; processing (DEFUN NUMBER-VALUE ...)
; processing (DEFUN PLACES ...)
; processing (DEFUN PARSE-NUMBER ...)
; processing (DEFUN PARSE-REAL-NUMBER ...)
; processing (DEFUN BASE-FOR-EXPONENT-MARKER ...)
; processing (DEFUN MAKE-FLOAT/FRAC ...)
; processing (DEFUN MAKE-FLOAT/WHOLE ...)
; processing (DEFUN PARSE-POSITIVE-REAL-NUMBER ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/parse-number/parse-number-tmpZ7L7FP0S.fasl
; compilation finished in 0:00:00.488
; compiling file "/usr/share/common-lisp/source/mssql/src/packages.lisp" (written 21 JUN 2017 01:29:38 PM):
; processing (DEFPACKAGE #:MSSQL ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/mssql/src/packages-tmpGCPRU2E.fasl
; compilation finished in 0:00:00.004
; compiling file "/usr/share/common-lisp/source/mssql/src/mssql.lisp" (written 21 JUN 2017 01:29:38 PM):
; processing (IN-PACKAGE :MSSQL)
; processing (DEFINE-FOREIGN-LIBRARY SYBDB ...)
; processing (WITH-SIMPLE-RESTART (SKIP "Skip loading foreign library tds.") ...)
; processing (DEFCTYPE %DBPROCESS ...)
; processing (DEFCTYPE %CHARPTR ...)
; processing (DEFCTYPE %LOGINREC ...)
; processing (DEFCTYPE %RETCODE ...)
; processing (DEFCTYPE %BYTE ...)
; processing (DEFCTYPE %DBINT ...)
; processing (DEFCTYPE %DBSMALLINT ...)
; processing (DEFCONSTANT +FAIL+ ...)
; processing (DEFCONSTANT +INT_CANCEL+ ...)
; processing (DEFINE-CONDITION MSSQL-ERROR ...)
; processing (DEFMETHOD PRINT-OBJECT ...)
; processing (DEFCFUN ("dberrhandle" %DBERRHANDLE) ...)
; processing (DEFVAR *ERROR-MESSAGE-LIST*)
; processing (DEFCALLBACK %ERROR-HANDLER ...)
; processing (%DBERRHANDLE (CALLBACK %ERROR-HANDLER))
; processing (DEFCFUN ("dbmsghandle" %DBMSGHANDLE) ...)
; processing (DEFCALLBACK %MESSAGE-HANDLER ...)
; processing (%DBMSGHANDLE (CALLBACK %MESSAGE-HANDLER))
; processing (DEFMACRO DEFINE-SYBDB-FUNCTION ...)
; processing (DEFUN CFFI-STRING ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/mssql/src/mssql-tmpTYRYY2X9.fasl
; compilation finished in 0:00:00.248
; compiling file "/usr/share/common-lisp/source/mssql/src/connection.lisp" (written 21 JUN 2017 01:29:38 PM):
; processing (IN-PACKAGE :MSSQL)
; processing (DEFVAR *DATABASE* ...)
; processing (DEFCLASS DATABASE-CONNECTION ...)
; processing (DEFINE-SYBDB-FUNCTION ("dblogin" %DBLOGIN ...) ...)
; processing (DEFINE-SYBDB-FUNCTION ("dbloginfree" %DBLOGINFREE) ...)
; processing (DEFINE-SYBDB-FUNCTION ("dbsetlname" %DBSETLNAME ...) ...)
; processing (DEFINE-SYBDB-FUNCTION ("tdsdbopen" %TDSDBOPEN ...) ...)
; processing (DEFINE-SYBDB-FUNCTION ("dbcmd" %DBCMD ...) ...)
; processing (DEFINE-SYBDB-FUNCTION ("dbsqlexec" %DBSQLEXEC ...) ...)
; processing (DEFINE-SYBDB-FUNCTION ("dbcancel" %DBCANCEL ...) ...)
; processing (DEFUN CONNECT ...)
; processing (DEFUN CONNECTED-P ...)
; processing (DEFINE-SYBDB-FUNCTION ("dbclose" %DBCLOSE) ...)
; processing (DEFUN DISCONNECT ...)
; processing (GARBAGE-POOLS:DEFCLEANUP DATABASE-CONNECTION ...)
; processing (DEFUN DISCONNECT-TOPLEVEL ...)
; processing (DEFUN CONNECT-TOPLEVEL ...)
; processing (DEFMACRO WITH-CONNECTION ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/mssql/src/connection-tmpOMAPSGL7.fasl
; compilation finished in 0:00:00.276
; compiling file "/usr/share/common-lisp/source/mssql/src/query.lisp" (written 21 JUN 2017 01:29:38 PM):
; processing (IN-PACKAGE :MSSQL)
; processing (DEFCONSTANT +NO-MORE-RESULTS+ ...)
; processing (DEFCONSTANT +NO-MORE-ROWS+ ...)
; processing (DEFINE-SYBDB-FUNCTION ("dbresults" %DBRESULTS) ...)
; processing (DEFINE-SYBDB-FUNCTION ("dbnumcols" %DBNUMCOLS) ...)
; processing (DEFINE-SYBDB-FUNCTION ("dbcolname" %DBCOLNAME) ...)
; processing (DEFINE-SYBDB-FUNCTION ("dbcoltype" %DBCOLTYPE) ...)
; processing (DEFINE-SYBDB-FUNCTION ("dbnextrow" %DBNEXTROW) ...)
; processing (DEFINE-SYBDB-FUNCTION ("dbdata" %DBDATA) ...)
; processing (DEFINE-SYBDB-FUNCTION ("dbdatlen" %DBDATLEN) ...)
; processing (DEFCENUM %SYB-VALUE-TYPE ...)
; processing (DEFINE-SYBDB-FUNCTION ("dbconvert" %DBCONVERT) ...)
; processing (DEFCONSTANT +NUMERIC-BUF-SZ+ ...)
; processing (DEFUN SYSDB-DATA-TO-LISP ...)
; processing (DEFUN FIELD-NAME-S ...)
; processing (DEFUN ONE-ROW ...)
; processing (DEFUN ALL-ROWS ...)
; processing (DEFMACRO DEFINE-ROW-READER ...)
; processing (DEFINE-ROW-READER READ-PLIST-ROW ...)
; processing (DEFINE-ROW-READER READ-ALIST-ROW ...)
; processing (DEFINE-ROW-READER READ-LIST-ROW ...)
; file: /usr/share/common-lisp/source/mssql/src/query.lisp
; in: DEFINE-ROW-READER READ-LIST-ROW
; (MSSQL::DEFINE-ROW-READER MSSQL::READ-LIST-ROW
; (MSSQL::COLLUMN MSSQL::VALUE)
; (ITERATE:COLLECT MSSQL::VALUE))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> ITERATE:ITER
; ==>
; (LET* ((#:LIST16 NIL)
; (MSSQL::COLLUMN NIL)
; (#:G2 NIL)
; (MSSQL::VALUE NIL)
; (#:RESULT15 NIL)
; (#:END-POINTER17 NIL)
; (#:TEMP18 NIL))
; (BLOCK NIL
; (BLOCK #:ITERATE3
; (TAGBODY
; (PROGN # #)
; MSSQL::LOOP-TOP-NIL
; (PROGN # # # # # #)
; (PROGN)
; (GO MSSQL::LOOP-TOP-NIL)
; MSSQL::LOOP-END-NIL
; (PROGN))
; #:RESULT15)))
;
; caught STYLE-WARNING:
; The variable COLLUMN is assigned but never read.
; processing (DEFUN READ-SINGLE-VALUE ...)
; processing (DEFPARAMETER *QUERY-FORMATS* ...)
; processing (DEFUN GET-RESULTS ...)
; processing (DEFUN QUERY ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/mssql/src/query-tmpB76HJA0J.fasl
; compilation finished in 0:00:00.316
WARNING:
Lisp compilation had style-warnings while
compiling #<CL-SOURCE-FILE "mssql" "src" "query">
; compiling file "/usr/share/common-lisp/source/mssql/src/execute.lisp" (written 21 JUN 2017 01:29:38 PM):
; processing (IN-PACKAGE :MSSQL)
; processing (DEFUN EXECUTE ...)
; processing (DEFCLASS TRANSACTION-HANDLE ...)
; processing (DEFMACRO WITH-TRANSACTION ...)
; processing (DEFUN ROLLBACK-TRANSACTION ...)
; processing (DEFUN COMMIT-TRANSACTION ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/mssql/src/execute-tmp7QTM681J.fasl
; compilation finished in 0:00:00.060
; compiling file "/usr/share/common-lisp/source/mssql/src/remote.lisp" (written 21 JUN 2017 01:29:38 PM):
; processing (IN-PACKAGE :MSSQL)
; processing (DEFINE-SYBDB-FUNCTION ("dbrpcinit" %DBRPCINIT) ...)
; processing (DEFINE-SYBDB-FUNCTION ("dbrpcparam" %DBRPCPARAM) ...)
; processing (DEFINE-SYBDB-FUNCTION ("dbrpcsend" %DBRPCSEND) ...)
; processing (DEFUN LISP-TO-SYSDB ...)
; processing (DEFUN CALL-REMOTE-PROCEDURE ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/mssql/src/remote-tmpLGH8FB0W.fasl
; compilation finished in 0:00:00.080
;
; compilation unit finished
; caught 1 STYLE-WARNING condition
; printed 6 notes
;; loading file #P"/<<PKGBUILDDIR>>/src/hooks.lisp"
;; loading #P"/<<PKGBUILDDIR>>/src/hooks.lisp"
;; #<PACKAGE "COMMON-LISP-USER">
;; (:PGLOADER-IMAGE :FLEXI-STREAMS CFFI-FEATURES:FLAT-NAMESPACE
CFFI-FEATURES:UNIX :CFFI CFFI-SYS::FLAT-NAMESPACE :32-BIT
ALEXANDRIA::SEQUENCE-EMPTYP :ASDF-SYSTEM-CONNECTIONS :ASDF3.3 :ASDF3.2
:ASDF3.1 :ASDF3 :ASDF2 :ASDF :OS-UNIX :NON-BASE-CHARS-EXIST-P :ASDF-UNICODE
:ARM :GENCGC :ANSI-CL :COMMON-LISP :ELF :IEEE-FLOATING-POINT :LINUX
:LITTLE-ENDIAN :PACKAGE-LOCAL-NICKNAMES :SB-CORE-COMPRESSION :SB-LDB
:SB-PACKAGE-LOCKS :SB-UNICODE :SBCL :UNIX)
;; T
;; CLOSE-FOREIGN-LIBS
;; OPEN-FOREIGN-LIBS
;; (#<FUNCTION OPEN-FOREIGN-LIBS>)
;; (#<FUNCTION CLOSE-FOREIGN-LIBS>)
;; loading system "pgloader"
WARNING: System definition file #P"/usr/share/common-lisp/source/cl-fad/cl-fad.asd" contains definition for system "cl-fad-test". Please only define "cl-fad" and secondary systems with a name starting with "cl-fad/" (e.g. "cl-fad/test") in that file.
WARNING: System definition file #P"/usr/share/common-lisp/source/ieee-floats/ieee-floats.asd" contains definition for system "ieee-floats-tests". Please only define "ieee-floats" and secondary systems with a name starting with "ieee-floats/" (e.g. "ieee-floats/test") in that file.
WARNING: UIOP/VERSION:PARSE-VERSION: "1.1-dev" doesn't follow asdf version numbering convention
WARNING: Invalid :version specifier "1.1-dev" for component "py-configparser" from file #P"/usr/share/common-lisp/source/py-configparser/py-configparser.asd", using NIL instead
WARNING: Invalid :version specifier "1.1-dev" for component "py-configparser" from file #P"/usr/share/common-lisp/source/py-configparser/py-configparser.asd", using NIL instead
WARNING: System definition file #P"/usr/share/common-lisp/source/trivial-utf-8/trivial-utf-8.asd" contains definition for system "trivial-utf-8-tests". Please only define "trivial-utf-8" and secondary systems with a name starting with "trivial-utf-8/" (e.g. "trivial-utf-8/test") in that file.
;;; Checking for wide character support... WARNING: Lisp implementation doesn't use UTF-16, but accepts surrogate code points.
yes, using code points.
WARNING: System definition file #P"/usr/share/common-lisp/source/cxml/cxml.asd" contains definition for system "cxml-xml". Please only define "cxml" and secondary systems with a name starting with "cxml/" (e.g. "cxml/test") in that file.
WARNING: System definition file #P"/usr/share/common-lisp/source/cxml/cxml.asd" contains definition for system "cxml-dom". Please only define "cxml" and secondary systems with a name starting with "cxml/" (e.g. "cxml/test") in that file.
WARNING: System definition file #P"/usr/share/common-lisp/source/cxml/cxml.asd" contains definition for system "cxml-klacks". Please only define "cxml" and secondary systems with a name starting with "cxml/" (e.g. "cxml/test") in that file.
WARNING: System definition file #P"/usr/share/common-lisp/source/cxml/cxml.asd" contains definition for system "cxml-test". Please only define "cxml" and secondary systems with a name starting with "cxml/" (e.g. "cxml/test") in that file.
;;; Checking for wide character support... WARNING: Lisp implementation doesn't use UTF-16, but accepts surrogate code points.
yes, using code points.
;;; Building Closure with CHARACTER RUNES
; compiling file "/usr/share/common-lisp/source/cl-log/pkg.lisp" (written 07 DEC 2012 12:06:09 PM):
; processing (IN-PACKAGE "CL-USER")
; processing (DEFPACKAGE "COM.RAVENBROOK.COMMON-LISP-LOG" ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-log/pkg-tmpDGQGGEC4.fasl
; compilation finished in 0:00:00.008
; compiling file "/usr/share/common-lisp/source/cl-log/cl-log.lisp" (written 07 DEC 2012 12:06:09 PM):
; processing (IN-PACKAGE "COM.RAVENBROOK.COMMON-LISP-LOG")
; processing (DEFPARAMETER *CL-LOG-RELEASE* ...)
; processing (DEFMACRO ORF ...)
; processing (DEFMACRO WHEN-LET ...)
; processing (DEFCLASS LOG-OBJECT ...)
; processing (DEFCLASS LOG-MANAGER ...)
; processing (DEFVAR *LOG-MANAGER* ...)
; processing (DEFUN LOG-MANAGER ...)
; processing (DEFMETHOD INITIALIZE-INSTANCE ...)
; processing (DEFUN FIRST-TIME-FOR-LOG-MANAGER ...)
; processing (DEFMETHOD LOGGING-DISABLED ...)
; processing (DEFMETHOD (SETF LOGGING-DISABLED) ...)
; processing (DEFMACRO WITH-LOGGING-DISABLED ...)
; processing (DEFMACRO WITH-LOG-MANAGER-DISABLED ...)
; processing (DEFMETHOD (SETF LOG-MANAGER-MESSENGERS) ...)
; processing (DEFMETHOD (SETF LOG-MANAGER-CATEGORY-SET) ...)
; processing (DEFMETHOD CATEGORY-CACHE ...)
; processing (DEFMETHOD INVALIDATE-LOG-MANAGER ...)
; processing (DEFUN (SETF LOG-MANAGER) ...)
; processing (DEFMACRO REBINDING-LOG-MANAGER ...)
; processing (DEFSTRUCT (TIMESTAMP #) ...)
; processing (DEFUN MAKE-TIMESTAMP ...)
; processing (DEFMETHOD PRINT-OBJECT ...)
; processing (DEFCLASS BASE-MESSAGE ...)
; processing (DEFMETHOD INITIALIZE-INSTANCE ...)
; processing (DEFMETHOD PRINT-OBJECT ...)
; processing (DEFCLASS FORMATTED-MESSAGE ...)
; processing (DEFMETHOD MESSAGE-TEXT ...)
; processing (DEFMETHOD FORMAT-MESSAGE ...)
; processing (DEFCLASS BASE-MESSENGER ...)
; processing (DEFMETHOD PRINT-OBJECT ...)
; processing (DEFMETHOD INITIALIZE-INSTANCE ...)
; processing (DEFUN START-MESSENGER ...)
; processing (DEFMETHOD STOP-MESSENGER ...)
; processing (DEFMETHOD STOP-MESSENGER ...)
; processing (DEFUN FIND-MESSENGER ...)
; processing (DEFUN CATEGORY-MESSENGERS ...)
; processing (DEFUN CATEGORY-SATISFIES ...)
; processing (DEFUN IN-CATEGORY-SATISFIES ...)
; processing (DEFUN SEND-MESSAGE ...)
; processing (DEFMETHOD MESSENGER-SEND-MESSAGE ...)
; processing (DEFSTRUCT (RING #) ...)
; processing (DEFMETHOD PRINT-OBJECT ...)
; processing (DEFUN MAKE-RING ...)
; processing (DEFUN RING-PUSH ...)
; processing (DEFUN RING-LIST ...)
; processing (DEFCLASS RING-MESSENGER ...)
; processing (DEFMETHOD INITIALIZE-INSTANCE ...)
; processing (DEFMETHOD PRINT-OBJECT ...)
; processing (DEFMETHOD MESSENGER-SEND-MESSAGE ...)
; processing (DEFMETHOD RING-MESSENGER-MESSAGES ...)
; processing (DEFCLASS TEXT-STREAM-MESSENGER ...)
; processing (DEFMETHOD MESSENGER-SEND-MESSAGE ...)
; processing (DEFMETHOD STOP-MESSENGER ...)
; processing (DEFCLASS TEXT-FILE-MESSENGER ...)
; processing (DEFMETHOD INITIALIZE-INSTANCE ...)
; processing (DEFCLASS CATEGORY-SET ...)
; processing (DEFUN EXPAND-CATEGORY ...)
; processing (DEFMACRO DEFCATEGORY ...)
; processing (DEFUN DEFCATEGORY-FN ...)
; processing (DEFMACRO UNDEFCATEGORY ...)
; processing (DEFUN UNDEFCATEGORY-FN ...)
; processing (DEFUN CLEAR-CATEGORIES ...)
; processing (DEFMACRO LOG-MANAGER-MESSAGE ...)
; processing (DEFMACRO LOG-MESSAGE ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-log/cl-log-tmp6X5OKNPG.fasl
; compilation finished in 0:00:00.872
; compiling file "/usr/share/common-lisp/source/md5/md5.lisp" (written 23 FEB 2018 11:24:35 PM):
; processing (DEFPACKAGE #:MD5 ...)
; processing (IN-PACKAGE #:MD5)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :EXECUTE) ...)
; processing (DEFTYPE UB32 ...)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...)
; processing (DEFTYPE UB32-VECTOR ...)
; processing (DEFMACRO MAKE-UB32-VECTOR ...)
; processing (DEFMACRO UB32-AREF ...)
; processing (DECLAIM (INLINE F ...) ...)
; processing (DEFUN F ...)
; file: /usr/share/common-lisp/source/md5/md5.lisp
; in: DEFUN F
; (DEFUN MD5::F (MD5::X MD5::Y MD5::Z)
; (DECLARE (TYPE MD5::UB32 MD5::X MD5::Y MD5::Z)
; (OPTIMIZE (SPEED 3) (SAFETY 0) (SPACE 0) (DEBUG 0)))
; (LOGIOR (LOGAND MD5::X MD5::Y) (LOGANDC1 MD5::X MD5::Z)))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA MD5::F
; (MD5::X MD5::Y MD5::Z)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (DECLARE (TYPE MD5::UB32 MD5::X MD5::Y MD5::Z)
; (OPTIMIZE (SPEED 3) (SAFETY 0) (SPACE 0) (DEBUG 0)))
; (BLOCK MD5::F (LOGIOR (LOGAND MD5::X MD5::Y) (LOGANDC1 MD5::X MD5::Z))))
;
; note: doing unsigned word to integer coercion (cost 20) to "<return value>"
; processing (DEFUN G ...)
; file: /usr/share/common-lisp/source/md5/md5.lisp
; in: DEFUN G
; (DEFUN MD5::G (MD5::X MD5::Y MD5::Z)
; (DECLARE (TYPE MD5::UB32 MD5::X MD5::Y MD5::Z)
; (OPTIMIZE (SPEED 3) (SAFETY 0) (SPACE 0) (DEBUG 0)))
; (LOGIOR (LOGAND MD5::X MD5::Z) (LOGANDC2 MD5::Y MD5::Z)))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA MD5::G
; (MD5::X MD5::Y MD5::Z)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (DECLARE (TYPE MD5::UB32 MD5::X MD5::Y MD5::Z)
; (OPTIMIZE (SPEED 3) (SAFETY 0) (SPACE 0) (DEBUG 0)))
; (BLOCK MD5::G (LOGIOR (LOGAND MD5::X MD5::Z) (LOGANDC2 MD5::Y MD5::Z))))
;
; note: doing unsigned word to integer coercion (cost 20) to "<return value>"
; processing (DEFUN H ...)
; file: /usr/share/common-lisp/source/md5/md5.lisp
; in: DEFUN H
; (DEFUN MD5::H (MD5::X MD5::Y MD5::Z)
; (DECLARE (TYPE MD5::UB32 MD5::X MD5::Y MD5::Z)
; (OPTIMIZE (SPEED 3) (SAFETY 0) (SPACE 0) (DEBUG 0)))
; (LOGXOR MD5::X MD5::Y MD5::Z))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA MD5::H
; (MD5::X MD5::Y MD5::Z)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (DECLARE (TYPE MD5::UB32 MD5::X MD5::Y MD5::Z)
; (OPTIMIZE (SPEED 3) (SAFETY 0) (SPACE 0) (DEBUG 0)))
; (BLOCK MD5::H (LOGXOR MD5::X MD5::Y MD5::Z)))
;
; note: doing unsigned word to integer coercion (cost 20) to "<return value>"
; processing (DEFUN I ...)
; file: /usr/share/common-lisp/source/md5/md5.lisp
; in: DEFUN I
; (DEFUN MD5::I (MD5::X MD5::Y MD5::Z)
; (DECLARE (TYPE MD5::UB32 MD5::X MD5::Y MD5::Z)
; (OPTIMIZE (SPEED 3) (SAFETY 0) (SPACE 0) (DEBUG 0)))
; (LDB (BYTE 32 0) (LOGXOR MD5::Y (LOGORC2 MD5::X MD5::Z))))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA MD5::I
; (MD5::X MD5::Y MD5::Z)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (DECLARE (TYPE MD5::UB32 MD5::X MD5::Y MD5::Z)
; (OPTIMIZE (SPEED 3) (SAFETY 0) (SPACE 0) (DEBUG 0)))
; (BLOCK MD5::I (LDB (BYTE 32 0) (LOGXOR MD5::Y (LOGORC2 MD5::X MD5::Z)))))
;
; note: doing unsigned word to integer coercion (cost 20) to "<return value>"
; processing (DECLAIM (INLINE MOD32+) ...)
; processing (DEFUN MOD32+ ...)
; file: /usr/share/common-lisp/source/md5/md5.lisp
; in: DEFUN MOD32+
; (DEFUN MD5::MOD32+ (MD5::A MD5::B)
; (DECLARE (TYPE MD5::UB32 MD5::A MD5::B)
; (OPTIMIZE (SPEED 3) (SAFETY 0) (SPACE 0) (DEBUG 0)))
; (LDB (BYTE 32 0) (+ MD5::A MD5::B)))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA MD5::MOD32+
; (MD5::A MD5::B)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (DECLARE (TYPE MD5::UB32 MD5::A MD5::B)
; (OPTIMIZE (SPEED 3) (SAFETY 0) (SPACE 0) (DEBUG 0)))
; (BLOCK MD5::MOD32+ (LDB (BYTE 32 0) (+ MD5::A MD5::B))))
;
; note: doing unsigned word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-COMPILER-MACRO MOD32+ ...)
; processing (DECLAIM (INLINE ROL32) ...)
; processing (DEFUN ROL32 ...)
; file: /usr/share/common-lisp/source/md5/md5.lisp
; in: DEFUN ROL32
; (DEFUN MD5::ROL32 (MD5::A MD5::S)
; (DECLARE (TYPE MD5::UB32 MD5::A)
; (TYPE (UNSIGNED-BYTE 5) MD5::S)
; (OPTIMIZE (SPEED 3) (SAFETY 0) (SPACE 0) (DEBUG 0)))
; (SB-ROTATE-BYTE:ROTATE-BYTE MD5::S (BYTE 32 0) MD5::A))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA MD5::ROL32
; (MD5::A MD5::S)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (DECLARE (TYPE MD5::UB32 MD5::A)
; (TYPE (UNSIGNED-BYTE 5) MD5::S)
; (OPTIMIZE (SPEED 3) (SAFETY 0) (SPACE 0) (DEBUG 0)))
; (BLOCK MD5::ROL32 (SB-ROTATE-BYTE:ROTATE-BYTE MD5::S (BYTE 32 0) MD5::A)))
;
; note: doing unsigned word to integer coercion (cost 20) to "<return value>"
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...)
; processing (DEFMACRO WITH-MD5-ROUND ...)
; processing (DEFTYPE MD5-REGS ...)
; processing (DEFMACRO MD5-REGS-A ...)
; processing (DEFMACRO MD5-REGS-B ...)
; processing (DEFMACRO MD5-REGS-C ...)
; processing (DEFMACRO MD5-REGS-D ...)
; processing (DEFCONSTANT +MD5-MAGIC-A+ ...)
; processing (DEFCONSTANT +MD5-MAGIC-B+ ...)
; processing (DEFCONSTANT +MD5-MAGIC-C+ ...)
; processing (DEFCONSTANT +MD5-MAGIC-D+ ...)
; processing (DECLAIM (INLINE INITIAL-MD5-REGS))
; processing (DEFUN INITIAL-MD5-REGS ...)
; processing (DEFTYPE MD5-BLOCK ...)
; processing (DEFUN UPDATE-MD5-BLOCK ...)
; processing (DECLAIM (INLINE FILL-BLOCK ...))
; processing (DEFUN FILL-BLOCK-UB8 ...)
; processing (DEFUN FILL-BLOCK-CHAR ...)
; processing (DEFUN FILL-BLOCK ...)
; processing (DECLAIM (INLINE MD5REGS-DIGEST))
; processing (DEFUN MD5REGS-DIGEST ...)
; processing (LOCALLY (DECLARE #) ...)
; file: /usr/share/common-lisp/source/md5/md5.lisp
; in: DEFSTRUCT MD5-STATE
; (DEFSTRUCT (MD5:MD5-STATE (:CONSTRUCTOR MD5:MAKE-MD5-STATE NIL) (:COPIER))
; (MD5::REGS (MD5:INITIAL-MD5-REGS) :TYPE MD5:MD5-REGS :READ-ONLY T)
; (MD5::AMOUNT 0 :TYPE (INTEGER 0 *))
; (BLOCK (MD5::MAKE-UB32-VECTOR 16) :READ-ONLY T :TYPE MD5::MD5-BLOCK)
; (MD5::BUFFER (MAKE-ARRAY 64 :ELEMENT-TYPE '(UNSIGNED-BYTE 8)) :READ-ONLY T
; :TYPE (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (64)))
; (MD5::BUFFER-INDEX 0 :TYPE (INTEGER 0 63))
; (MD5::FINALIZED-P NIL))
; --> SB-C:XDEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; --> FUNCTION BLOCK LET SB-KERNEL:THE* MULTIPLE-VALUE-BIND LET UNLESS IF AND
; --> IF LOCALLY AND THE >=
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
; --> SB-KERNEL::%TARGET-DEFSTRUCT SB-KERNEL::%TARGET-DEFSTRUCT
; --> SB-INT:NAMED-LAMBDA FUNCTION AND IF IF =
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The second argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The second argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
; processing (DECLAIM (INLINE COPY-TO-BUFFER))
; processing (DEFUN COPY-TO-BUFFER ...)
; processing (DEFUN UPDATE-MD5-STATE ...)
; file: /usr/share/common-lisp/source/md5/md5.lisp
; in: DEFUN UPDATE-MD5-STATE
; (+ (MD5::MD5-STATE-AMOUNT MD5::STATE) LENGTH)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; processing (DEFUN FINALIZE-MD5-STATE ...)
; file: /usr/share/common-lisp/source/md5/md5.lisp
; in: DEFUN FINALIZE-MD5-STATE
; (* 8 (MD5::MD5-STATE-AMOUNT MD5::STATE))
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE . #2#), not a (VALUES FIXNUM &REST
; T).
; etc.
; (LDB (BYTE 32 0) MD5::TOTAL-LENGTH)
;
; note: forced to do full call
; unable to do #1=inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; unable to do #1# (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
; (LDB (BYTE 32 32) MD5::TOTAL-LENGTH)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do #1# (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE . #2#), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; unable to do #1# (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
; processing (DEFUN MD5SUM-SEQUENCE ...)
; file: /usr/share/common-lisp/source/md5/md5.lisp
; in: DEFUN MD5SUM-SEQUENCE
; (MD5:UPDATE-MD5-STATE MD5::STATE MD5::DATA :START MD5::REAL-START :END
; (+ MD5::REAL-START (- MD5::END MD5::START)))
; --> LET UNLESS IF
; ==>
; (SB-INT:FIXNUMP #:G60)
;
; note: doing signed word to integer coercion (cost 20), for:
; the first argument of FIXNUMP
; processing (DEFUN MD5SUM-STRING ...)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...)
; processing (DEFTYPE BUFFER-INDEX ...)
; processing (DEFUN MD5SUM-STREAM ...)
; processing (DEFUN MD5SUM-FILE ...)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :EXECUTE) ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/md5/md5-tmpABKNHGCI.fasl
; compilation finished in 0:00:01.692
; compiling file "/usr/share/common-lisp/source/cl-split-sequence/package.lisp" (written 28 MAY 2021 03:05:40 AM):
; processing (DEFPACKAGE #:SPLIT-SEQUENCE ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-split-sequence/package-tmpDGT3OQUT.fasl
; compilation finished in 0:00:00.004
; compiling file "/usr/share/common-lisp/source/cl-split-sequence/vector.lisp" (written 28 MAY 2021 03:05:40 AM):
; processing (IN-PACKAGE :SPLIT-SEQUENCE)
; processing (DECLAIM (INLINE SPLIT-VECTOR ...))
; processing (DEFTYPE ARRAY-INDEX ...)
; processing (DECLAIM (FTYPE # ...))
; processing (DECLAIM (FTYPE # ...))
; processing (DEFUN SPLIT-VECTOR-FROM-END ...)
; processing (DEFUN SPLIT-VECTOR-FROM-START ...)
; processing (DEFUN SPLIT-VECTOR-IF ...)
; processing (DEFUN SPLIT-VECTOR-IF-NOT ...)
; processing (DEFUN SPLIT-VECTOR ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-split-sequence/vector-tmpNF26V1SW.fasl
; compilation finished in 0:00:00.500
; compiling file "/usr/share/common-lisp/source/cl-split-sequence/list.lisp" (written 28 MAY 2021 03:05:40 AM):
; processing (IN-PACKAGE :SPLIT-SEQUENCE)
; processing (DECLAIM (INLINE COLLECT-UNTIL ...))
; processing (DECLAIM (FTYPE # ...))
; processing (DECLAIM (FTYPE # ...))
; processing (DEFUN COLLECT-UNTIL ...)
; processing (DEFUN COUNT-WHILE ...)
; processing (DEFUN SPLIT-LIST-INTERNAL ...)
; processing (DEFUN SPLIT-LIST-FROM-END ...)
; processing (DEFUN SPLIT-LIST-FROM-START ...)
; processing (DEFUN SPLIT-LIST-IF ...)
; processing (DEFUN SPLIT-LIST-IF-NOT ...)
; processing (DEFUN SPLIT-LIST ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-split-sequence/list-tmp2SBNA8NV.fasl
; compilation finished in 0:00:00.772
; compiling file "/usr/share/common-lisp/source/cl-split-sequence/extended-sequence.lisp" (written 28 MAY 2021 03:05:40 AM):
; processing (IN-PACKAGE :SPLIT-SEQUENCE)
; processing (DEFTYPE EXTENDED-SEQUENCE ...)
; processing (DECLAIM (INLINE SPLIT-EXTENDED-SEQUENCE ...))
; processing (DECLAIM (FTYPE # ...))
; processing (DECLAIM (FTYPE # ...))
; processing (DEFUN SPLIT-EXTENDED-SEQUENCE-FROM-END ...)
; processing (DEFUN SPLIT-EXTENDED-SEQUENCE-FROM-START ...)
; processing (DEFUN SPLIT-EXTENDED-SEQUENCE-IF ...)
; processing (DEFUN SPLIT-EXTENDED-SEQUENCE-IF-NOT ...)
; processing (DEFUN SPLIT-EXTENDED-SEQUENCE ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-split-sequence/extended-sequence-tmpGXTLRZRR.fasl
; compilation finished in 0:00:00.424
; compiling file "/usr/share/common-lisp/source/cl-split-sequence/api.lisp" (written 28 MAY 2021 03:05:40 AM):
; processing (IN-PACKAGE :SPLIT-SEQUENCE)
; processing (DEFUN LIST-LONG-ENOUGH-P ...)
; processing (DEFUN CHECK-BOUNDS ...)
; processing (DEFINE-CONDITION SIMPLE-PROGRAM-ERROR ...)
; processing (DEFMACRO CHECK-TESTS ...)
; processing (DECLAIM (FTYPE # ...))
; processing (DEFUN SPLIT-SEQUENCE ...)
; processing (DEFUN SPLIT-SEQUENCE-IF ...)
; processing (DEFUN SPLIT-SEQUENCE-IF-NOT ...)
; processing (PUSHNEW :SPLIT-SEQUENCE ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-split-sequence/api-tmp2OV9B8J5.fasl
; compilation finished in 0:00:01.816
; compiling file "/usr/share/common-lisp/source/cl-split-sequence/documentation.lisp" (written 28 MAY 2021 03:05:40 AM):
; processing (IN-PACKAGE :SPLIT-SEQUENCE)
; processing (SETF (DOCUMENTATION # ...) ...)
; processing (SETF (DOCUMENTATION # ...) ...)
; processing (SETF (DOCUMENTATION # ...) ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/cl-split-sequence/documentation-tmpDWRCTFSG.fasl
; compilation finished in 0:00:00.008
; compiling file "/usr/share/common-lisp/source/usocket/package.lisp" (written 23 DEC 2019 01:05:56 PM):
; processing (DEFPACKAGE :USOCKET ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/usocket/package-tmpUJ89U641.fasl
; compilation finished in 0:00:00.008
; compiling file "/usr/share/common-lisp/source/usocket/usocket.lisp" (written 23 DEC 2019 01:05:56 PM):
; processing (IN-PACKAGE :USOCKET)
; processing (DEFPARAMETER *WILDCARD-HOST* ...)
; processing (DEFPARAMETER *AUTO-PORT* ...)
; processing (DEFPARAMETER *VERSION* ...)
; processing (DEFCONSTANT +MAX-DATAGRAM-PACKET-SIZE+ ...)
; processing (DEFCLASS USOCKET ...)
; processing (DEFGENERIC SOCKET-STATE ...)
; processing (DEFMETHOD SOCKET-STATE ...)
; processing (DEFCLASS STREAM-USOCKET ...)
; processing (DEFCLASS STREAM-SERVER-USOCKET ...)
; processing (DEFCLASS DATAGRAM-USOCKET ...)
; processing (DEFUN USOCKET-P ...)
; processing (DEFUN STREAM-USOCKET-P ...)
; processing (DEFUN STREAM-SERVER-USOCKET-P ...)
; processing (DEFUN DATAGRAM-USOCKET-P ...)
; processing (DEFUN MAKE-SOCKET ...)
; processing (DEFUN MAKE-STREAM-SOCKET ...)
; processing (DEFUN MAKE-STREAM-SERVER-SOCKET ...)
; processing (DEFUN MAKE-DATAGRAM-SOCKET ...)
; processing (DEFGENERIC SOCKET-ACCEPT ...)
; processing (DEFGENERIC SOCKET-CLOSE ...)
; processing (DEFMETHOD SOCKET-CLOSE ...)
; processing (DEFGENERIC SOCKET-SHUTDOWN ...)
; processing (DEFGENERIC SOCKET-SEND ...)
; processing (DEFGENERIC SOCKET-RECEIVE ...)
; processing (DEFGENERIC GET-LOCAL-ADDRESS ...)
; processing (DEFGENERIC GET-PEER-ADDRESS ...)
; processing (DEFGENERIC GET-LOCAL-PORT ...)
; processing (DEFGENERIC GET-PEER-PORT ...)
; processing (DEFGENERIC GET-LOCAL-NAME ...)
; processing (DEFGENERIC GET-PEER-NAME ...)
; processing (DEFMACRO WITH-CONNECTED-SOCKET ...)
; processing (DEFMACRO WITH-CLIENT-SOCKET ...)
; processing (DEFMACRO WITH-SERVER-SOCKET ...)
; processing (DEFMACRO WITH-SOCKET-LISTENER ...)
; processing (DEFSTRUCT (WAIT-LIST #) ...)
; processing (DEFUN MAKE-WAIT-LIST ...)
; processing (DEFUN ADD-WAITER ...)
; processing (DEFUN REMOVE-WAITER ...)
; processing (DEFUN REMOVE-ALL-WAITERS ...)
; processing (DEFUN WAIT-FOR-INPUT ...)
; processing (DEFUN INTEGER-TO-OCTET-BUFFER ...)
; processing (DEFUN OCTET-BUFFER-TO-INTEGER ...)
; processing (DEFMACRO PORT-TO-OCTET-BUFFER ...)
; processing (DEFMACRO IP-TO-OCTET-BUFFER ...)
; processing (DEFMACRO PORT-FROM-OCTET-BUFFER ...)
; processing (DEFMACRO IP-FROM-OCTET-BUFFER ...)
; processing (DEFUN LIST-OF-STRINGS-TO-INTEGERS ...)
; processing (DEFUN IP-ADDRESS-STRING-P ...)
; processing (DEFUN HBO-TO-DOTTED-QUAD ...)
; processing (DEFUN HBO-TO-VECTOR-QUAD ...)
; processing (DEFUN VECTOR-QUAD-TO-DOTTED-QUAD ...)
; processing (DEFUN DOTTED-QUAD-TO-VECTOR-QUAD ...)
; processing (DEFGENERIC HOST-BYTE-ORDER ...)
; processing (DEFMETHOD HOST-BYTE-ORDER ...)
; processing (DEFMETHOD HOST-BYTE-ORDER ...)
; processing (DEFMETHOD HOST-BYTE-ORDER ...)
; processing (DEFUN VECTOR-TO-IPV6-HOST ...)
; processing (DEFUN SPLIT-IPV6-ADDRESS ...)
; processing (DEFUN IPV6-HOST-TO-VECTOR ...)
; processing (DEFUN HOST-TO-HOSTNAME ...)
; processing (DEFUN IP= ...)
; processing (DEFUN IP/= ...)
; processing (DEFUN GET-HOST-BY-NAME ...)
; processing (DEFUN GET-RANDOM-HOST-BY-NAME ...)
; processing (DEFUN HOST-TO-VECTOR-QUAD ...)
; processing (DEFUN HOST-TO-HBO ...)
; processing (DEFUN SPLIT-TIMEOUT ...)
; processing (SETF (DOCUMENTATION # ...) ...)
; processing (SETF (DOCUMENTATION # ...) ...)
; processing (PROCLAIM (QUOTE #))
; processing (DEFUN BOOL->INT ...)
; processing (DEFUN INT->BOOL ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/usocket/usocket-tmpJAPE3FUS.fasl
; compilation finished in 0:00:00.748
; compiling file "/usr/share/common-lisp/source/usocket/condition.lisp" (written 23 DEC 2019 01:05:56 PM):
; processing (IN-PACKAGE :USOCKET)
; processing (DEFINE-CONDITION INSUFFICIENT-IMPLEMENTATION ...)
; processing (DEFINE-CONDITION UNSUPPORTED ...)
; processing (DEFINE-CONDITION UNIMPLEMENTED ...)
; processing (DEFINE-CONDITION SOCKET-CONDITION ...)
; processing (DEFINE-CONDITION SOCKET-ERROR ...)
; processing (DEFINE-CONDITION NS-CONDITION ...)
; processing (DEFINE-CONDITION NS-ERROR ...)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...)
; processing (DEFMACRO DEFINE-USOCKET-CONDITION-CLASSES ...)
; processing (DEFINE-USOCKET-CONDITION-CLASSES (INTERRUPTED-CONDITION) ...)
; processing (DEFINE-CONDITION UNKNOWN-CONDITION ...)
; processing (DEFINE-USOCKET-CONDITION-CLASSES (ADDRESS-IN-USE-ERROR ADDRESS-NOT-AVAILABLE-ERROR ...) ...)
; processing (DEFINE-CONDITION UNKNOWN-ERROR ...)
; processing (DEFINE-USOCKET-CONDITION-CLASSES (NS-TRY-AGAIN-CONDITION) ...)
; processing (DEFINE-CONDITION NS-UNKNOWN-CONDITION ...)
; processing (DEFINE-USOCKET-CONDITION-CLASSES (NS-HOST-NOT-FOUND-ERROR NS-NO-RECOVERY-ERROR) ...)
; processing (DEFINE-CONDITION NS-UNKNOWN-ERROR ...)
; processing (DEFMACRO WITH-MAPPED-CONDITIONS ...)
; processing (DEFPARAMETER +UNIX-ERRNO-CONDITION-MAP+ ...)
; processing (DEFPARAMETER +UNIX-ERRNO-ERROR-MAP+ ...)
; processing (DEFUN MAP-ERRNO-CONDITION ...)
; processing (DEFUN MAP-ERRNO-ERROR ...)
; processing (DEFPARAMETER +UNIX-NS-ERROR-MAP+ ...)
; processing (DEFMACRO UNSUPPORTED ...)
; processing (DEFMACRO UNIMPLEMENTED ...)
; processing (DEFMACRO IGNORE-UNSUPPORTED-WARNINGS ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/usocket/condition-tmp1V7T6W0W.fasl
; compilation finished in 0:00:00.204
; compiling file "/usr/share/common-lisp/source/usocket/backend/sbcl.lisp" (written 23 DEC 2019 01:05:56 PM):
; processing (IN-PACKAGE :USOCKET)
; processing (PROGN (DEFUN GET-HOST-NAME ...))
; processing (DEFUN MAP-SOCKET-ERROR ...)
; processing (DEFPARAMETER +SBCL-CONDITION-MAP+ ...)
; processing (DEFPARAMETER +SBCL-ERROR-MAP+ ...)
; processing (DEFUN HANDLE-CONDITION ...)
; processing (DEFVAR *DUMMY-STREAM* ...)
; processing (DEFMACRO %WITH-TIMEOUT ...)
; processing (DEFUN GET-HOSTS-BY-NAME ...)
; processing (DEFUN SOCKET-CONNECT ...)
; file: /usr/share/common-lisp/source/usocket/backend/sbcl.lisp
; in: DEFUN SOCKET-CONNECT
; (USOCKET::%WITH-TIMEOUT (USOCKET::TIMEOUT (ERROR 'TIMEOUT))
; (USOCKET::CONNECT))
; --> TAGBODY FLET LET
; ==>
; (MAKE-TIMER #'#:G17)
;
; note: could not stack allocate:
; (%WITH-TIMEOUT (TIMEOUT (ERROR 'SB-EXT:TIMEOUT))
; (CONNECT))
; processing (DEFUN SOCKET-LISTEN ...)
; processing (DEFMETHOD SOCKET-ACCEPT ...)
; processing (DEFMETHOD SOCKET-CLOSE ...)
; processing (DEFMETHOD SOCKET-CLOSE ...)
; processing (DEFMETHOD SOCKET-SHUTDOWN ...)
; processing (DEFMETHOD SOCKET-SEND ...)
; processing (DEFMETHOD SOCKET-RECEIVE ...)
; file: /usr/share/common-lisp/source/usocket/backend/sbcl.lisp
; in: DEFMETHOD SOCKET-RECEIVE (DATAGRAM-USOCKET T T)
; (DEFMETHOD USOCKET:SOCKET-RECEIVE
; ((USOCKET:USOCKET USOCKET:DATAGRAM-USOCKET) USOCKET::BUFFER LENGTH
; &KEY (USOCKET::ELEMENT-TYPE '(UNSIGNED-BYTE 8)))
; (DECLARE
; (VALUES (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) (INTEGER 0)
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) (UNSIGNED-BYTE 16)))
; (USOCKET:WITH-MAPPED-CONDITIONS (USOCKET:USOCKET)
; (LET ((USOCKET::S #))
; (SB-BSD-SOCKETS:SOCKET-RECEIVE USOCKET::S USOCKET::BUFFER LENGTH
; :ELEMENT-TYPE USOCKET::ELEMENT-TYPE))))
; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; ==>
; (THE
; (VALUES (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) UNSIGNED-BYTE
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) (UNSIGNED-BYTE 16) &REST T)
; (PROGN
; (SYMBOL-MACROLET ((SB-PCL::PV-ENV-ENVIRONMENT SB-PCL::DEFAULT))
; (SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS (# SB-PCL::.NEXT-METHOD-CALL. #
; NIL :CALL-NEXT-METHOD-P NIL
; :SETQ-P NIL :PARAMETERS-SETQD NIL
; :METHOD-CELL # ...)
; (DECLARE #)
; (LOCALLY # #)))))
;
; note: Type assertion too complex to check:
; (VALUES (SIMPLE-ARRAY (UNSIGNED-BYTE 8) . #1=((*))) UNSIGNED-BYTE
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) . #1#) (UNSIGNED-BYTE 16) &REST T).
; It allows an unknown number of values, consider using
; (VALUES (SIMPLE-ARRAY (UNSIGNED-BYTE 8) . #1=((*))) UNSIGNED-BYTE
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) . #1#) (UNSIGNED-BYTE 16) &OPTIONAL).
; processing (DEFMETHOD GET-LOCAL-NAME ...)
; processing (DEFMETHOD GET-PEER-NAME ...)
; processing (DEFMETHOD GET-LOCAL-ADDRESS ...)
; processing (DEFMETHOD GET-PEER-ADDRESS ...)
; processing (DEFMETHOD GET-LOCAL-PORT ...)
; processing (DEFMETHOD GET-PEER-PORT ...)
; processing (DEFUN GET-HOST-BY-ADDRESS ...)
; processing (PROGN (DEFUN %SETUP-WAIT-LIST ...) ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/usocket/backend/sbcl-tmp952LXWTD.fasl
; compilation finished in 0:00:00.572
; compiling file "/usr/share/common-lisp/source/usocket/option.lisp" (written 23 DEC 2019 01:05:56 PM):
; processing (IN-PACKAGE :USOCKET)
; processing (DEFPARAMETER *BACKEND* ...)
; processing (DEFGENERIC SOCKET-OPTION ...)
; processing (DEFGENERIC (SETF SOCKET-OPTION) ...)
; processing (DEFMETHOD SOCKET-OPTION ...)
; processing (DEFMETHOD (SETF SOCKET-OPTION) ...)
; processing (DEFMETHOD SOCKET-OPTION ...)
; processing (DEFMETHOD (SETF SOCKET-OPTION) ...)
; processing (DEFMETHOD SOCKET-OPTION ...)
; processing (DEFMETHOD (SETF SOCKET-OPTION) ...)
; processing (DEFMETHOD SOCKET-OPTION ...)
; processing (DEFMETHOD (SETF SOCKET-OPTION) ...)
; processing (DEFMETHOD SOCKET-OPTION ...)
; processing (DEFMETHOD (SETF SOCKET-OPTION) ...)
; processing (DEFMETHOD SOCKET-OPTION ...)
; processing (DEFMETHOD (SETF SOCKET-OPTION) ...)
; processing (DEFMETHOD SOCKET-OPTION ...)
; processing (DEFMETHOD SOCKET-OPTION ...)
; processing (DEFMETHOD (SETF SOCKET-OPTION) ...)
; processing (DEFMETHOD (SETF SOCKET-OPTION) ...)
; processing (EVAL-WHEN (:LOAD-TOPLEVEL :EXECUTE) ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/usocket/option-tmpLVFWNUU9.fasl
; compilation finished in 0:00:00.376
; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/trivial-utf-8.lisp" (written 26 APR 2018 03:04:31 PM):
; processing (DEFPACKAGE :CL-POSTGRES-TRIVIAL-UTF-8 ...)
; processing (IN-PACKAGE :CL-POSTGRES-TRIVIAL-UTF-8)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...)
; processing (DEFUN UTF-8-BYTE-LENGTH ...)
; processing (DEFMACRO AS-UTF-8-BYTES ...)
; processing (DEFUN STRING-TO-UTF-8-BYTES ...)
; processing (DEFUN WRITE-UTF-8-BYTES ...)
; processing (DEFINE-CONDITION UTF-8-DECODING-ERROR ...)
; processing (DECLAIM (INLINE UTF-8-GROUP-SIZE))
; processing (DEFUN UTF-8-GROUP-SIZE ...)
; processing (DEFUN UTF-8-STRING-LENGTH ...)
; processing (DEFUN GET-UTF-8-CHARACTER ...)
; processing (DEFUN UTF-8-BYTES-TO-STRING ...)
; file: /usr/share/common-lisp/source/postmodern/cl-postgres/trivial-utf-8.lisp
; in: DEFUN UTF-8-BYTES-TO-STRING
; (COERCE CL-POSTGRES-TRIVIAL-UTF-8::BYTES-IN
; '(SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)))
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (AND VECTOR
; (NOT
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; . #1=((*))))), not a (SIMPLE-ARRAY * . #1#).
; processing (DEFUN READ-UTF-8-STRING ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/postmodern/cl-postgres/trivial-utf-8-tmpDKBKLORG.fasl
; compilation finished in 0:00:00.404
; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/ieee-floats.lisp" (written 26 APR 2018 03:04:31 PM):
; processing (DEFPACKAGE :CL-POSTGRES-IEEE-FLOATS ...)
; processing (IN-PACKAGE :CL-POSTGRES-IEEE-FLOATS)
; processing (DEFMACRO MAKE-FLOAT-CONVERTERS ...)
; processing (MAKE-FLOAT-CONVERTERS ENCODE-FLOAT32 ...)
; processing (MAKE-FLOAT-CONVERTERS ENCODE-FLOAT64 ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/postmodern/cl-postgres/ieee-floats-tmpMO2T7PGC.fasl
; compilation finished in 0:00:00.192
; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/features.lisp" (written 26 APR 2018 03:04:31 PM):
; processing (DEFPACKAGE :CL-POSTGRES.FEATURES ...)
; processing (IN-PACKAGE :CL-POSTGRES.FEATURES)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/postmodern/cl-postgres/features-tmp5EVOKXWI.fasl
; compilation finished in 0:00:00.016
; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/package.lisp" (written 26 APR 2018 03:04:31 PM):
; processing (DEFPACKAGE :CL-POSTGRES ...)
; processing (DEFPACKAGE :CL-POSTGRES-ERROR ...)
; processing (DEFPACKAGE :CL-POSTGRES-OID ...)
; processing (IN-PACKAGE :CL-POSTGRES)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/postmodern/cl-postgres/package-tmp7EN5VFOC.fasl
; compilation finished in 0:00:00.012
; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/errors.lisp" (written 26 APR 2018 03:04:31 PM):
; processing (IN-PACKAGE :CL-POSTGRES)
; processing (DEFPARAMETER *CURRENT-QUERY* ...)
; processing (DEFPARAMETER *QUERY-LOG* ...)
; processing (DEFPARAMETER *QUERY-CALLBACK* ...)
; processing (DEFUN LOG-QUERY ...)
; processing (DEFMACRO WITH-QUERY ...)
; processing (DEFINE-CONDITION DATABASE-ERROR ...)
; processing (DEFUN DATABASE-ERROR-CONSTRAINT-NAME ...)
; file: /usr/share/common-lisp/source/postmodern/cl-postgres/errors.lisp
; in: DEFUN DATABASE-ERROR-CONSTRAINT-NAME
; (TYPECASE CL-POSTGRES::ERR
; (CL-POSTGRES-ERROR:NOT-NULL-VIOLATION
; (CL-POSTGRES::EXTRACT-QUOTED-PART CL-POSTGRES::MESSAGE 0))
; (CL-POSTGRES-ERROR:UNIQUE-VIOLATION
; (CL-POSTGRES::EXTRACT-QUOTED-PART CL-POSTGRES::MESSAGE 0))
; (CL-POSTGRES-ERROR:FOREIGN-KEY-VIOLATION
; (CL-POSTGRES::EXTRACT-QUOTED-PART CL-POSTGRES::MESSAGE 1))
; (CL-POSTGRES-ERROR:CHECK-VIOLATION
; (CL-POSTGRES::EXTRACT-QUOTED-PART CL-POSTGRES::MESSAGE 1)))
; --> COND IF
; ==>
; (TYPEP #:G1 'CL-POSTGRES-ERROR:NOT-NULL-VIOLATION)
;
; note: can't open-code test of unknown type CL-POSTGRES-ERROR:NOT-NULL-VIOLATION
; --> COND IF IF
; ==>
; (TYPEP #:G1 'CL-POSTGRES-ERROR:UNIQUE-VIOLATION)
;
; note: can't open-code test of unknown type CL-POSTGRES-ERROR:UNIQUE-VIOLATION
; --> COND IF IF IF
; ==>
; (TYPEP #:G1 'CL-POSTGRES-ERROR:FOREIGN-KEY-VIOLATION)
;
; note: can't open-code test of unknown type CL-POSTGRES-ERROR:FOREIGN-KEY-VIOLATION
; --> COND IF IF IF IF
; ==>
; (TYPEP #:G1 'CL-POSTGRES-ERROR:CHECK-VIOLATION)
;
; note: can't open-code test of unknown type CL-POSTGRES-ERROR:CHECK-VIOLATION
; processing (DEFINE-CONDITION DATABASE-CONNECTION-ERROR ...)
; processing (DEFINE-CONDITION DATABASE-CONNECTION-LOST ...)
; processing (DEFINE-CONDITION DATABASE-SOCKET-ERROR ...)
; processing (DEFUN WRAP-SOCKET-ERROR ...)
; processing (IN-PACKAGE :CL-POSTGRES-ERROR)
; processing (DEFPARAMETER *ERROR-TABLE* ...)
; processing (DEFMACRO DEFERROR ...)
; processing (DEFERROR "0A" ...)
; processing (DEFERROR "22" ...)
; processing (DEFERROR "22012" ...)
; processing (DEFERROR "22007" ...)
; processing (DEFERROR "22003" ...)
; processing (DEFERROR "22P01" ...)
; processing (DEFERROR "23" ...)
; processing (DEFERROR "23001" ...)
; processing (DEFERROR "23502" ...)
; processing (DEFERROR "23503" ...)
; processing (DEFERROR "23505" ...)
; processing (DEFERROR "23514" ...)
; processing (DEFERROR "42" ...)
; processing (DEFERROR "42501" ...)
; processing (DEFERROR "40" ...)
; processing (DEFERROR "40001" ...)
; processing (DEFERROR "40002" ...)
; processing (DEFERROR "40003" ...)
; processing (DEFERROR "40P01" ...)
; processing (DEFERROR "42P01" ...)
; processing (DEFERROR "42601" ...)
; processing (DEFERROR "42703" ...)
; processing (DEFERROR "42701" ...)
; processing (DEFERROR "42P03" ...)
; processing (DEFERROR "42P04" ...)
; processing (DEFERROR "42723" ...)
; processing (DEFERROR "42P05" ...)
; processing (DEFERROR "42P06" ...)
; processing (DEFERROR "42P07" ...)
; processing (DEFERROR "42712" ...)
; processing (DEFERROR "42710" ...)
; processing (DEFERROR "53" ...)
; processing (DEFERROR "54" ...)
; processing (DEFERROR "55" ...)
; processing (DEFERROR "55006" ...)
; processing (DEFERROR "55P03" ...)
; processing (DEFERROR "57" ...)
; processing (DEFERROR "57014" ...)
; processing (DEFINE-CONDITION SERVER-SHUTDOWN ...)
; processing (DEFERROR "57P01" ...)
; processing (DEFERROR "57P02" ...)
; processing (DEFERROR "57P03" ...)
; processing (DEFERROR "58" ...)
; processing (DEFERROR "XX" ...)
; processing (DEFUN GET-ERROR-TYPE ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/postmodern/cl-postgres/errors-tmpWA664A3J.fasl
; compilation finished in 0:00:00.168
; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/sql-string.lisp" (written 26 APR 2018 03:04:31 PM):
; processing (IN-PACKAGE :CL-POSTGRES)
; processing (DEFUN ESCAPE-BYTES ...)
; processing (DEFPARAMETER *SILENTLY-TRUNCATE-RATIONALS* ...)
; processing (DEFUN WRITE-RATIONAL-AS-FLOATING-POINT ...)
; file: /usr/share/common-lisp/source/postmodern/cl-postgres/sql-string.lisp
; in: DEFUN WRITE-RATIONAL-AS-FLOATING-POINT
; (< NUMBER 0)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (- NUMBER)
;
; note: unable to
; Eliminate %negate/%negate of rationals
; due to type uncertainty:
; The first argument is a (OR (DOUBLE-FLOAT * (0.0d0)) (SINGLE-FLOAT * (0.0))
; (RATIONAL * (0))), not a RATIONAL.
; (TRUNCATE
; (IF (< NUMBER 0)
; (PROG1 (- NUMBER) (WRITE-CHAR #\- STREAM))
; NUMBER))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR (DOUBLE-FLOAT 0.0d0) (SINGLE-FLOAT 0.0)
; (RATIONAL 0)), not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR (DOUBLE-FLOAT 0.0d0) (SINGLE-FLOAT 0.0)
; (RATIONAL 0)), not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a (OR (DOUBLE-FLOAT 0.0d0) (SINGLE-FLOAT 0.0)
; (RATIONAL 0)), not a FLOAT.
; (- CL-POSTGRES::DIGIT-LENGTH-LIMIT (LENGTH CL-POSTGRES::QUOTIENT-PART))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; (ZEROP CL-POSTGRES::REMAINDER)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
; (* CL-POSTGRES::REMAINDER 10)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a INTEGER.
;
; note: unable to
; associate */(* /) of constants
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a RATIONAL.
; (FLOOR (* CL-POSTGRES::REMAINDER 10))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-10) (10))), not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-10) (10))), not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-10) (10))), not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-10) (10))), not a FLOAT.
; (<= CL-POSTGRES::DECIMAL-LENGTH-LIMIT 0)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (DOUBLE-FLOAT 0.0d0) (SINGLE-FLOAT 0.0)
; (RATIONAL 0)), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
; (< NUMBER 0)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
; (- NUMBER)
;
; note: forced to do full call
; unable to do #1=inline float arithmetic (cost 1) because:
; The first argument is a (OR (DOUBLE-FLOAT * #2=(0.0d0))
; (SINGLE-FLOAT * #3=(0.0)) (RATIONAL * #4=(0))), not a DOUBLE-FLOAT.
; The result is a (VALUES
; (OR (RATIONAL #5=(0)) (SINGLE-FLOAT #6=(-0.0))
; (DOUBLE-FLOAT #7=(-0.0d0)))
; . #8=(&OPTIONAL)), not a (VALUES DOUBLE-FLOAT &REST T).
; unable to do #1# (cost 1) because:
; The first argument is a (OR (DOUBLE-FLOAT * #2#) (SINGLE-FLOAT * #3#)
; (RATIONAL * #4#)), not a SINGLE-FLOAT.
; The result is a (VALUES
; (OR (RATIONAL #5#) (SINGLE-FLOAT #6#)
; (DOUBLE-FLOAT #7#))
; . #8#), not a (VALUES SINGLE-FLOAT &REST T).
; etc.
; (TRUNCATE
; (IF (< NUMBER 0)
; (PROG1 (- NUMBER) (WRITE-CHAR #\- STREAM))
; NUMBER))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR (DOUBLE-FLOAT 0.0d0) (SINGLE-FLOAT 0.0)
; (RATIONAL 0)), not a FIXNUM.
; The second argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL #1=(-1) #2=(1)))
; . #3=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (OR (DOUBLE-FLOAT 0.0d0) (SINGLE-FLOAT 0.0)
; (RATIONAL 0)), not a (UNSIGNED-BYTE 32).
; The second argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (OR FLOAT (RATIONAL #1# #2#)) . #3#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST
; T).
; etc.
; (- CL-POSTGRES::DIGIT-LENGTH-LIMIT (LENGTH CL-POSTGRES::QUOTIENT-PART))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a NUMBER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (<= CL-POSTGRES::DECIMAL-LENGTH-LIMIT 0)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
; (> CL-POSTGRES::DECIMAL-DIGITS CL-POSTGRES::DECIMAL-LENGTH-LIMIT)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER 1), not a FIXNUM.
; The second argument is a (OR (DOUBLE-FLOAT 0.0d0) (SINGLE-FLOAT 0.0)
; (RATIONAL 0)), not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a (INTEGER 1), not a (UNSIGNED-BYTE 32).
; The second argument is a (OR (DOUBLE-FLOAT 0.0d0) (SINGLE-FLOAT 0.0)
; (RATIONAL 0)), not a (UNSIGNED-BYTE 32).
; etc.
; (* CL-POSTGRES::REMAINDER 10)
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a (OR FLOAT (RATIONAL #2=(-1) #3=(1))), not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL #4=(-10) #5=(10)))
; . #6=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (OR FLOAT (RATIONAL #2# #3#)), not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL #4# #5#)) . #6#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; (FLOOR (* CL-POSTGRES::REMAINDER 10))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR FLOAT (RATIONAL #1=(-10) #2=(10))), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL #3=(-1) #4=(1)))
; . #5=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (OR FLOAT (RATIONAL #1# #2#)), not a (UNSIGNED-BYTE
; 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (OR FLOAT (RATIONAL #3# #4#)) . #5#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a (OR FLOAT (RATIONAL #2=(-10) #3=(10))), not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a (OR FLOAT (RATIONAL #2# #3#)), not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #2#), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a (OR FLOAT (RATIONAL #2=(-1) #3=(1))), not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL #4=(0) #5=(2)))
; . #6=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (OR FLOAT (RATIONAL #2# #3#)), not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL #4# #5#)) . #6#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; (LOOP :FOR CL-POSTGRES::DECIMAL-DIGITS :UPFROM 1
; :UNTIL (ZEROP CL-POSTGRES::REMAINDER)
; :DO (WHEN
; (> CL-POSTGRES::DECIMAL-DIGITS
; CL-POSTGRES::DECIMAL-LENGTH-LIMIT)
; (CL-POSTGRES::FAIL))
; :DO (MULTIPLE-VALUE-BIND (CL-POSTGRES::QUOTIENT REM)
; (FLOOR (* CL-POSTGRES::REMAINDER 10))
; (PRINC CL-POSTGRES::QUOTIENT STREAM)
; (SETF CL-POSTGRES::REMAINDER REM)))
; --> LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE 1+
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER 1), not a FIXNUM.
; The result is a (VALUES (INTEGER 2) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (INTEGER 1), not a FIXNUM.
; The result is a (VALUES (INTEGER 2) . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; processing (DEFUN WRITE-QUOTED ...)
; processing (DEFGENERIC TO-SQL-STRING ...)
; processing (DEFGENERIC SERIALIZE-FOR-POSTGRES ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/postmodern/cl-postgres/sql-string-tmp3CS3QORN.fasl
; compilation finished in 0:00:00.268
; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/strings-utf-8.lisp" (written 11 FEB 2021 02:48:52 PM):
; processing (IN-PACKAGE :CL-POSTGRES)
; processing (DEFPARAMETER *CLIENT-ENCODING* ...)
; processing (DECLAIM (INLINE ENC-BYTE-LENGTH))
; processing (DEFUN ENC-BYTE-LENGTH ...)
; processing (DECLAIM (INLINE ENC-WRITE-STRING))
; processing (DEFUN ENC-WRITE-STRING ...)
; processing (DECLAIM (INLINE ENC-READ-STRING))
; processing (DECLAIM (FTYPE # ...))
; processing (DEFUN ENC-READ-STRING ...)
; file: /usr/share/common-lisp/source/postmodern/cl-postgres/strings-utf-8.lisp
; in: DEFUN ENC-READ-STRING
; (DEFUN CL-POSTGRES::ENC-READ-STRING
; (CL-POSTGRES::INPUT
; &KEY CL-POSTGRES::NULL-TERMINATED (CL-POSTGRES::BYTE-LENGTH -1))
; (CL-POSTGRES-TRIVIAL-UTF-8:READ-UTF-8-STRING CL-POSTGRES::INPUT
; :NULL-TERMINATED
; CL-POSTGRES::NULL-TERMINATED
; :BYTE-LENGTH
; CL-POSTGRES::BYTE-LENGTH))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL-POSTGRES::ENC-READ-STRING
; (CL-POSTGRES::INPUT &KEY CL-POSTGRES::NULL-TERMINATED
; (CL-POSTGRES::BYTE-LENGTH -1))
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL-POSTGRES::ENC-READ-STRING
; (CL-POSTGRES-TRIVIAL-UTF-8:READ-UTF-8-STRING CL-POSTGRES::INPUT
; :NULL-TERMINATED
; CL-POSTGRES::NULL-TERMINATED
; :BYTE-LENGTH
; CL-POSTGRES::BYTE-LENGTH)))
;
; note: Type assertion too complex to check:
; (VALUES STRING &REST T).
; It allows an unknown number of values, consider using
; (VALUES STRING &OPTIONAL).
; processing (DECLAIM (INLINE ENC-STRING-BYTES))
; processing (DEFUN ENC-STRING-BYTES ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/postmodern/cl-postgres/strings-utf-8-tmpD6CVA6PG.fasl
; compilation finished in 0:00:00.052
; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/communicate.lisp" (written 26 APR 2018 03:04:31 PM):
; processing (IN-PACKAGE :CL-POSTGRES)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...)
; processing (DEFMACRO INTEGER-READER ...)
; processing (DEFMACRO INTEGER-WRITER ...)
; processing (INTEGER-READER 1)
; processing (INTEGER-READER 2)
; processing (INTEGER-READER 4)
; file: /usr/share/common-lisp/source/postmodern/cl-postgres/communicate.lisp
; in: INTEGER-READER 4
; (CL-POSTGRES::INTEGER-READER 4)
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL-POSTGRES::READ-INT4
; (CL-POSTGRES::SOCKET)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (DECLARE (TYPE STREAM CL-POSTGRES::SOCKET)
; (OPTIMIZE (SPEED 3) (SAFETY 0) (SPACE 1) (DEBUG 1)
; (COMPILATION-SPEED 0)))
; (BLOCK CL-POSTGRES::READ-INT4
; (LET ((CL-POSTGRES::RESULT 0))
; (DECLARE (TYPE # CL-POSTGRES::RESULT))
; (SETF # #)
; (SETF # #)
; (SETF # #)
; (SETF # #)
; (IF (LOGBITP 31 CL-POSTGRES::RESULT)
; (DPB CL-POSTGRES::RESULT # -1)
; CL-POSTGRES::RESULT))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; ==>
; #'(SB-INT:NAMED-LAMBDA CL-POSTGRES::READ-UINT4
; (CL-POSTGRES::SOCKET)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (DECLARE (TYPE STREAM CL-POSTGRES::SOCKET)
; (OPTIMIZE (SPEED 3) (SAFETY 0) (SPACE 1) (DEBUG 1)
; (COMPILATION-SPEED 0)))
; (BLOCK CL-POSTGRES::READ-UINT4
; (LET ((CL-POSTGRES::RESULT 0))
; (DECLARE (TYPE # CL-POSTGRES::RESULT))
; (SETF # #)
; (SETF # #)
; (SETF # #)
; (SETF # #)
; CL-POSTGRES::RESULT)))
;
; note: doing unsigned word to integer coercion (cost 20) from RESULT to "<return value>"
; processing (INTEGER-READER 8)
; file: /usr/share/common-lisp/source/postmodern/cl-postgres/communicate.lisp
; in: INTEGER-READER 8
; (CL-POSTGRES::INTEGER-READER 8)
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK LET SETF LET* SETQ THE DPB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK LET IF DPB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (SIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (SIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK LET SETF LET* SETQ THE DPB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; processing (INTEGER-WRITER 1)
; processing (INTEGER-WRITER 2)
; processing (INTEGER-WRITER 4)
; processing (DEFUN WRITE-BYTES ...)
; processing (DEFUN WRITE-STR ...)
; processing (DECLAIM (FTYPE # ...))
; processing (DEFUN READ-BYTES ...)
; processing (DECLAIM (FTYPE # ...))
; processing (DEFUN READ-STR ...)
; processing (DECLAIM (FTYPE # ...))
; processing (DEFUN READ-SIMPLE-STR ...)
; file: /usr/share/common-lisp/source/postmodern/cl-postgres/communicate.lisp
; in: DEFUN READ-SIMPLE-STR
; (< CL-POSTGRES::B 128)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a (OR (INTEGER * -1) (INTEGER 1)), not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a (OR (INTEGER * -1) (INTEGER 1)), not a FIXNUM.
; etc.
; processing (DEFUN SKIP-BYTES ...)
; processing (DEFUN SKIP-STR ...)
; processing (DEFUN ENSURE-SOCKET-IS-CLOSED ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/postmodern/cl-postgres/communicate-tmpJTJ7UKVB.fasl
; compilation finished in 0:00:00.420
; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp" (written 26 APR 2018 03:04:31 PM):
; processing (IN-PACKAGE :CL-POSTGRES)
; processing (DEFMACRO DEFINE-MESSAGE ...)
; processing (DEFINE-MESSAGE SSL-REQUEST-MESSAGE ...)
; processing (DEFINE-MESSAGE STARTUP-MESSAGE ...)
; file: /usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp
; in: DEFINE-MESSAGE STARTUP-MESSAGE
; (CL-POSTGRES::DEFINE-MESSAGE CL-POSTGRES::STARTUP-MESSAGE
; NIL
; (CL-POSTGRES::USER CL-POSTGRES::DATABASE)
; (CL-POSTGRES::UINT 4 196608)
; (STRING "user")
; (STRING CL-POSTGRES::USER)
; (STRING "database")
; (STRING CL-POSTGRES::DATABASE)
; (STRING "client_encoding")
; (STRING CL-POSTGRES::*CLIENT-ENCODING*)
; (CL-POSTGRES::UINT 1 0))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> LET CL-POSTGRES::WRITE-UINT4 +
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The second argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER . #1#), not a (VALUES SINGLE-FLOAT &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The second argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER . #1#), not a (VALUES SINGLE-FLOAT &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The second argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER . #1#), not a (VALUES SINGLE-FLOAT &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The second argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER . #1#), not a (VALUES SINGLE-FLOAT &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The second argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a NUMBER, not a (UNSIGNED-BYTE 32).
; The second argument is a NUMBER, not a (UNSIGNED-BYTE 32).
; etc.
; processing (DEFINE-MESSAGE PLAIN-PASSWORD-MESSAGE ...)
; file: /usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp
; in: DEFINE-MESSAGE PLAIN-PASSWORD-MESSAGE
; (CL-POSTGRES::DEFINE-MESSAGE CL-POSTGRES::PLAIN-PASSWORD-MESSAGE
; #\p
; (CL-POSTGRES::PASSWORD)
; (STRING CL-POSTGRES::PASSWORD))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> LET CL-POSTGRES::WRITE-UINT4
; ==>
; (+ 5 (CL-POSTGRES::ENC-BYTE-LENGTH #:G1))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES FIXNUM
; &REST T).
; etc.
; processing (DEFUN BYTES-TO-HEX-STRING ...)
; file: /usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp
; in: DEFUN BYTES-TO-HEX-STRING
; (LOOP :FOR BYTE :ACROSS CL-POSTGRES::BYTES
; :FOR CL-POSTGRES::POS :FROM 0 :BY 2
; :DO ...)
; --> LET LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; processing (DEFUN MD5-PASSWORD ...)
; processing (DEFINE-MESSAGE MD5-PASSWORD-MESSAGE ...)
; file: /usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp
; in: DEFINE-MESSAGE MD5-PASSWORD-MESSAGE
; (CL-POSTGRES::DEFINE-MESSAGE CL-POSTGRES::MD5-PASSWORD-MESSAGE
; #\p
; (CL-POSTGRES::PASSWORD CL-POSTGRES::USER CL-POSTGRES::SALT)
; (STRING
; (CL-POSTGRES::MD5-PASSWORD CL-POSTGRES::PASSWORD CL-POSTGRES::USER
; CL-POSTGRES::SALT)))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> LET CL-POSTGRES::WRITE-UINT4
; ==>
; (+ 5 (CL-POSTGRES::ENC-BYTE-LENGTH #:G1))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES FIXNUM
; &REST T).
; etc.
; processing (DEFINE-MESSAGE GSS-AUTH-BUFFER-MESSAGE ...)
; file: /usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp
; in: DEFINE-MESSAGE GSS-AUTH-BUFFER-MESSAGE
; (CL-POSTGRES::DEFINE-MESSAGE CL-POSTGRES::GSS-AUTH-BUFFER-MESSAGE
; #\p
; (CL-POSTGRES::BUF)
; (CL-POSTGRES::BYTES CL-POSTGRES::BUF))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> LET CL-POSTGRES::WRITE-UINT4 +
; ==>
; (LENGTH #:G1)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; processing (DEFINE-MESSAGE QUERY-MESSAGE ...)
; file: /usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp
; in: DEFINE-MESSAGE QUERY-MESSAGE
; (CL-POSTGRES::DEFINE-MESSAGE CL-POSTGRES::QUERY-MESSAGE
; #\Q
; (CL-POSTGRES::QUERY)
; (STRING CL-POSTGRES::QUERY))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> LET CL-POSTGRES::WRITE-UINT4
; ==>
; (+ 5 (CL-POSTGRES::ENC-BYTE-LENGTH #:G1))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES FIXNUM
; &REST T).
; etc.
; processing (DEFINE-MESSAGE SIMPLE-PARSE-MESSAGE ...)
; file: /usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp
; in: DEFINE-MESSAGE SIMPLE-PARSE-MESSAGE
; (CL-POSTGRES::DEFINE-MESSAGE CL-POSTGRES::SIMPLE-PARSE-MESSAGE
; #\P
; (CL-POSTGRES::QUERY)
; (CL-POSTGRES::UINT 1 0)
; (STRING CL-POSTGRES::QUERY)
; (CL-POSTGRES::UINT 2 0))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> LET CL-POSTGRES::WRITE-UINT4
; ==>
; (+ 8 (CL-POSTGRES::ENC-BYTE-LENGTH #:G2))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES FIXNUM
; &REST T).
; etc.
; processing (DEFINE-MESSAGE PARSE-MESSAGE ...)
; file: /usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp
; in: DEFINE-MESSAGE PARSE-MESSAGE
; (CL-POSTGRES::DEFINE-MESSAGE CL-POSTGRES::PARSE-MESSAGE
; #\P
; (CL-POSTGRES::NAME CL-POSTGRES::QUERY)
; (STRING CL-POSTGRES::NAME)
; (STRING CL-POSTGRES::QUERY)
; (CL-POSTGRES::UINT 2 0))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> LET CL-POSTGRES::WRITE-UINT4 +
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The second argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a NUMBER, not a (UNSIGNED-BYTE 32).
; The second argument is a NUMBER, not a (UNSIGNED-BYTE 32).
; etc.
; processing (DEFINE-MESSAGE CLOSE-PREPARED-MESSAGE ...)
; file: /usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp
; in: DEFINE-MESSAGE CLOSE-PREPARED-MESSAGE
; (CL-POSTGRES::DEFINE-MESSAGE CL-POSTGRES::CLOSE-PREPARED-MESSAGE
; #\C
; (CL-POSTGRES::NAME)
; (CL-POSTGRES::UINT 1 83)
; (STRING CL-POSTGRES::NAME))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> LET CL-POSTGRES::WRITE-UINT4
; ==>
; (+ 6 (CL-POSTGRES::ENC-BYTE-LENGTH #:G2))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES FIXNUM
; &REST T).
; etc.
; processing (DEFUN FORMATS-TO-BYTES ...)
; file: /usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp
; in: DEFUN FORMATS-TO-BYTES
; (LOOP :FOR FORMAT :ACROSS CL-POSTGRES::FORMATS
; :FOR CL-POSTGRES::POS :FROM 1 :BY 2
; :DO ...)
; --> LET LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; --> LET LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE
; ==>
; (+ CL-POSTGRES::POS 2)
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER 1), not a FIXNUM.
; The result is a (VALUES (INTEGER 3) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (INTEGER 1), not a FIXNUM.
; The result is a (VALUES (INTEGER 3) . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; processing (DEFINE-MESSAGE SIMPLE-BIND-MESSAGE ...)
; processing (DEFUN BIND-MESSAGE ...)
; file: /usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp
; in: DEFUN BIND-MESSAGE
; (+ 12 (CL-POSTGRES::ENC-BYTE-LENGTH CL-POSTGRES::NAME)
; (* 6 CL-POSTGRES::N-PARAMS) (* 2 CL-POSTGRES::N-RESULT-FORMATS)
; (LOOP :FOR CL-POSTGRES::SIZE :OF-TYPE FIXNUM :ACROSS CL-POSTGRES::PARAM-SIZES
; :SUM CL-POSTGRES::SIZE))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; (LOOP :FOR FORMAT :ACROSS CL-POSTGRES::RESULT-FORMATS
; :DO (CL-POSTGRES::WRITE-UINT2 CL-POSTGRES::SOCKET
; (IF FORMAT
; 1
; 0)))
; --> LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; (+ 12 (CL-POSTGRES::ENC-BYTE-LENGTH CL-POSTGRES::NAME)
; (* 6 CL-POSTGRES::N-PARAMS) (* 2 CL-POSTGRES::N-RESULT-FORMATS)
; (LOOP :FOR CL-POSTGRES::SIZE :OF-TYPE FIXNUM :ACROSS CL-POSTGRES::PARAM-SIZES
; :SUM CL-POSTGRES::SIZE))
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a NUMBER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a NUMBER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) &OPTIONAL), not a (VALUES
; FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a NUMBER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (LOOP :FOR CL-POSTGRES::SIZE :OF-TYPE FIXNUM :ACROSS CL-POSTGRES::PARAM-SIZES
; :SUM CL-POSTGRES::SIZE)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; processing (DEFINE-MESSAGE SIMPLE-DESCRIBE-MESSAGE ...)
; processing (DEFINE-MESSAGE DESCRIBE-PREPARED-MESSAGE ...)
; file: /usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp
; in: DEFINE-MESSAGE DESCRIBE-PREPARED-MESSAGE
; (CL-POSTGRES::DEFINE-MESSAGE CL-POSTGRES::DESCRIBE-PREPARED-MESSAGE
; #\D
; (CL-POSTGRES::NAME)
; (CL-POSTGRES::UINT 1 83)
; (STRING CL-POSTGRES::NAME))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> LET CL-POSTGRES::WRITE-UINT4
; ==>
; (+ 6 (CL-POSTGRES::ENC-BYTE-LENGTH #:G2))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES FIXNUM
; &REST T).
; etc.
; processing (DEFINE-MESSAGE SIMPLE-EXECUTE-MESSAGE ...)
; processing (DEFINE-MESSAGE FLUSH-MESSAGE ...)
; processing (DEFINE-MESSAGE SYNC-MESSAGE ...)
; processing (DEFINE-MESSAGE TERMINATE-MESSAGE ...)
; processing (DEFINE-MESSAGE COPY-DONE-MESSAGE ...)
; processing (DEFUN COPY-DATA-MESSAGE ...)
; processing (DEFINE-MESSAGE COPY-FAIL-MESSAGE ...)
; file: /usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp
; in: DEFINE-MESSAGE COPY-FAIL-MESSAGE
; (CL-POSTGRES::DEFINE-MESSAGE CL-POSTGRES::COPY-FAIL-MESSAGE
; #\f
; (CL-POSTGRES::REASON)
; (STRING CL-POSTGRES::REASON))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> LET CL-POSTGRES::WRITE-UINT4
; ==>
; (+ 5 (CL-POSTGRES::ENC-BYTE-LENGTH #:G1))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES FIXNUM
; &REST T).
; etc.
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/postmodern/cl-postgres/messages-tmpI3M10D0B.fasl
; compilation finished in 0:00:00.760
; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/oid.lisp" (written 26 APR 2018 03:04:31 PM):
; processing (IN-PACKAGE :CL-POSTGRES-OID)
; processing (DEFCONSTANT +BOOL+ ...)
; processing (DEFCONSTANT +BYTEA+ ...)
; processing (DEFCONSTANT +CHAR+ ...)
; processing (DEFCONSTANT +NAME+ ...)
; processing (DEFCONSTANT +INT8+ ...)
; processing (DEFCONSTANT +INT2+ ...)
; processing (DEFCONSTANT +INT2VECTOR+ ...)
; processing (DEFCONSTANT +INT4+ ...)
; processing (DEFCONSTANT +REGPROC+ ...)
; processing (DEFCONSTANT +TEXT+ ...)
; processing (DEFCONSTANT +OID+ ...)
; processing (DEFCONSTANT +TID+ ...)
; processing (DEFCONSTANT +XID+ ...)
; processing (DEFCONSTANT +CID+ ...)
; processing (DEFCONSTANT +OID-VECTOR+ ...)
; processing (DEFCONSTANT +JSON+ ...)
; processing (DEFCONSTANT +XML+ ...)
; processing (DEFCONSTANT +PGNODETREE+ ...)
; processing (DEFCONSTANT +PGDDLCOMMAND+ ...)
; processing (DEFCONSTANT +POINT+ ...)
; processing (DEFCONSTANT +LSEG+ ...)
; processing (DEFCONSTANT +PATH+ ...)
; processing (DEFCONSTANT +BOX+ ...)
; processing (DEFCONSTANT +POLYGON+ ...)
; processing (DEFCONSTANT +LINE+ ...)
; processing (DEFCONSTANT +FLOAT4+ ...)
; processing (DEFCONSTANT +FLOAT8+ ...)
; processing (DEFCONSTANT +ABSTIME+ ...)
; processing (DEFCONSTANT +RELTIME+ ...)
; processing (DEFCONSTANT +TINTERVAL+ ...)
; processing (DEFCONSTANT +UNKNOWN+ ...)
; processing (DEFCONSTANT +CIRCLE+ ...)
; processing (DEFCONSTANT +CASH+ ...)
; processing (DEFCONSTANT +MACADDR+ ...)
; processing (DEFCONSTANT +INET+ ...)
; processing (DEFCONSTANT +CIDR+ ...)
; processing (DEFCONSTANT +BOOL-ARRAY+ ...)
; processing (DEFCONSTANT +BYTEA-ARRAY+ ...)
; processing (DEFCONSTANT +CHAR-ARRAY+ ...)
; processing (DEFCONSTANT +NAME-ARRAY+ ...)
; processing (DEFCONSTANT +INT2-ARRAY+ ...)
; processing (DEFCONSTANT +INT4-ARRAY+ ...)
; processing (DEFCONSTANT +TEXT-ARRAY+ ...)
; processing (DEFCONSTANT +BPCHAR-ARRAY+ ...)
; processing (DEFCONSTANT +VARCHAR-ARRAY+ ...)
; processing (DEFCONSTANT +INT8-ARRAY+ ...)
; processing (DEFCONSTANT +POINT-ARRAY+ ...)
; processing (DEFCONSTANT +LSEG-ARRAY+ ...)
; processing (DEFCONSTANT +BOX-ARRAY+ ...)
; processing (DEFCONSTANT +FLOAT4-ARRAY+ ...)
; processing (DEFCONSTANT +FLOAT8-ARRAY+ ...)
; processing (DEFCONSTANT +OID-ARRAY+ ...)
; processing (DEFCONSTANT +ACLITEM+ ...)
; processing (DEFCONSTANT +CSTRING-ARRAY+ ...)
; processing (DEFCONSTANT +BPCHAR+ ...)
; processing (DEFCONSTANT +VARCHAR+ ...)
; processing (DEFCONSTANT +DATE+ ...)
; processing (DEFCONSTANT +TIME+ ...)
; processing (DEFCONSTANT +TIMESTAMP+ ...)
; processing (DEFCONSTANT +TIMESTAMP-ARRAY+ ...)
; processing (DEFCONSTANT +DATE-ARRAY+ ...)
; processing (DEFCONSTANT +TIME-ARRAY+ ...)
; processing (DEFCONSTANT +TIMESTAMPTZ+ ...)
; processing (DEFCONSTANT +TIMESTAMPTZ-ARRAY+ ...)
; processing (DEFCONSTANT +INTERVAL+ ...)
; processing (DEFCONSTANT +INTERVAL-ARRAY+ ...)
; processing (DEFCONSTANT +TIMETZ+ ...)
; processing (DEFCONSTANT +BIT+ ...)
; processing (DEFCONSTANT +BIT-ARRAY+ ...)
; processing (DEFCONSTANT +VARBIT+ ...)
; processing (DEFCONSTANT +VARBIT-ARRAY+ ...)
; processing (DEFCONSTANT +NUMERIC+ ...)
; processing (DEFCONSTANT +NUMERIC-ARRAY+ ...)
; processing (DEFCONSTANT +REFCURSOR+ ...)
; processing (DEFCONSTANT +REGPROCEDURE+ ...)
; processing (DEFCONSTANT +REGOPER+ ...)
; processing (DEFCONSTANT +REGOPERATOR+ ...)
; processing (DEFCONSTANT +REGCLASS+ ...)
; processing (DEFCONSTANT +REGTYPE+ ...)
; processing (DEFCONSTANT +REGROLE+ ...)
; processing (DEFCONSTANT +REGNAMESPACE+ ...)
; processing (DEFCONSTANT +REGTYPE-ARRAY+ ...)
; processing (DEFCONSTANT +UUID+ ...)
; processing (DEFCONSTANT +LSN+ ...)
; processing (DEFCONSTANT +TSVECTOR+ ...)
; processing (DEFCONSTANT +GTSVECTOR+ ...)
; processing (DEFCONSTANT +TSQUERY+ ...)
; processing (DEFCONSTANT +REGCONFIG+ ...)
; processing (DEFCONSTANT +REGDICTIONARY+ ...)
; processing (DEFCONSTANT +JSONB+ ...)
; processing (DEFCONSTANT +INT4RANGE+ ...)
; processing (DEFCONSTANT +RECORD+ ...)
; processing (DEFCONSTANT +RECORD-ARRAY+ ...)
; processing (DEFCONSTANT +CSTRING+ ...)
; processing (DEFCONSTANT +ANY+ ...)
; processing (DEFCONSTANT +ANY-ARRAY+ ...)
; processing (DEFCONSTANT +V-OID+ ...)
; processing (DEFCONSTANT +TRIGGER+ ...)
; processing (DEFCONSTANT +EVTTRIGGER+ ...)
; processing (DEFCONSTANT +LANGUAGE-HANDLER+ ...)
; processing (DEFCONSTANT +INTERNAL+ ...)
; processing (DEFCONSTANT +OPAQUE+ ...)
; processing (DEFCONSTANT +ANYELEMENT+ ...)
; processing (DEFCONSTANT +ANYNON-ARRAY+ ...)
; processing (DEFCONSTANT +ANYENUM+ ...)
; processing (DEFCONSTANT +FDW-HANDLER+ ...)
; processing (DEFCONSTANT +INDEX-AM-HANDLER+ ...)
; processing (DEFCONSTANT +TSM-HANDLER+ ...)
; processing (DEFCONSTANT +ANYRANGE+ ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/postmodern/cl-postgres/oid-tmpMQ8L07M8.fasl
; compilation finished in 0:00:00.036
; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/interpret.lisp" (written 26 APR 2018 03:04:31 PM):
; processing (IN-PACKAGE :CL-POSTGRES)
; processing (DEFPARAMETER *TIMESTAMP-FORMAT* ...)
; processing (DEFPARAMETER *SQL-READTABLE* ...)
; processing (DEFUN INTERPRET-AS-TEXT ...)
; file: /usr/share/common-lisp/source/postmodern/cl-postgres/interpret.lisp
; in: DEFUN INTERPRET-AS-TEXT
; (CL-POSTGRES::ENC-READ-STRING STREAM :BYTE-LENGTH CL-POSTGRES::SIZE)
;
; note: Type assertion too complex to check:
; (VALUES STRING &REST T).
; It allows an unknown number of values, consider using
; (VALUES STRING &OPTIONAL).
; processing (DEFCLASS TYPE-INTERPRETER ...)
; processing (DEFUN INTERPRETER-BINARY-P ...)
; processing (DEFUN INTERPRETER-READER ...)
; processing (LET (#) ...)
; processing (DEFUN SET-SQL-READER ...)
; processing (DEFMACRO BINARY-READER ...)
; processing (DEFMACRO DEFINE-INTERPRETER ...)
; processing (DEFINE-INTERPRETER CL-POSTGRES-OID:+CHAR+ ...)
; processing (DEFINE-INTERPRETER CL-POSTGRES-OID:+INT2+ ...)
; processing (DEFINE-INTERPRETER CL-POSTGRES-OID:+INT4+ ...)
; processing (DEFINE-INTERPRETER CL-POSTGRES-OID:+INT8+ ...)
; processing (DEFINE-INTERPRETER CL-POSTGRES-OID:+OID+ ...)
; processing (DEFINE-INTERPRETER CL-POSTGRES-OID:+BOOL+ ...)
; processing (DEFINE-INTERPRETER CL-POSTGRES-OID:+BYTEA+ ...)
; processing (DEFINE-INTERPRETER CL-POSTGRES-OID:+TEXT+ ...)
; file: /usr/share/common-lisp/source/postmodern/cl-postgres/interpret.lisp
; in: DEFINE-INTERPRETER CL-POSTGRES-OID:+TEXT+
; (CL-POSTGRES::DEFINE-INTERPRETER CL-POSTGRES-OID:+TEXT+
; "text"
; STRING)
; --> CL-POSTGRES:SET-SQL-READER CL-POSTGRES::BINARY-READER FUNCTION
; ==>
; (CL-POSTGRES::ENC-READ-STRING #:G2 :BYTE-LENGTH (- #:G3 0))
;
; note: Type assertion too complex to check:
; (VALUES STRING &REST T).
; It allows an unknown number of values, consider using
; (VALUES STRING &OPTIONAL).
; processing (DEFINE-INTERPRETER CL-POSTGRES-OID:+BPCHAR+ ...)
; file: /usr/share/common-lisp/source/postmodern/cl-postgres/interpret.lisp
; in: DEFINE-INTERPRETER CL-POSTGRES-OID:+BPCHAR+
; (CL-POSTGRES::DEFINE-INTERPRETER CL-POSTGRES-OID:+BPCHAR+
; "bpchar"
; STRING)
; --> CL-POSTGRES:SET-SQL-READER CL-POSTGRES::BINARY-READER FUNCTION
; ==>
; (CL-POSTGRES::ENC-READ-STRING #:G2 :BYTE-LENGTH (- #:G3 0))
;
; note: Type assertion too complex to check:
; (VALUES STRING &REST T).
; It allows an unknown number of values, consider using
; (VALUES STRING &OPTIONAL).
; processing (DEFINE-INTERPRETER CL-POSTGRES-OID:+VARCHAR+ ...)
; file: /usr/share/common-lisp/source/postmodern/cl-postgres/interpret.lisp
; in: DEFINE-INTERPRETER CL-POSTGRES-OID:+VARCHAR+
; (CL-POSTGRES::DEFINE-INTERPRETER CL-POSTGRES-OID:+VARCHAR+
; "varchar"
; STRING)
; --> CL-POSTGRES:SET-SQL-READER CL-POSTGRES::BINARY-READER FUNCTION
; ==>
; (CL-POSTGRES::ENC-READ-STRING #:G2 :BYTE-LENGTH (- #:G3 0))
;
; note: Type assertion too complex to check:
; (VALUES STRING &REST T).
; It allows an unknown number of values, consider using
; (VALUES STRING &OPTIONAL).
; processing (DEFUN READ-ROW-VALUE ...)
; processing (DEFPARAMETER *READ-ROW-VALUES-AS-BINARY* ...)
; processing (SET-SQL-READER CL-POSTGRES-OID:+RECORD+ ...)
; processing (DEFMACRO WITH-BINARY-ROW-VALUES ...)
; processing (DEFMACRO WITH-TEXT-ROW-VALUES ...)
; processing (DEFUN READ-BINARY-BITS ...)
; processing (SET-SQL-READER CL-POSTGRES-OID:+BIT+ ...)
; processing (SET-SQL-READER CL-POSTGRES-OID:+VARBIT+ ...)
; processing (DEFUN READ-BINARY-ARRAY-VALUE ...)
; file: /usr/share/common-lisp/source/postmodern/cl-postgres/interpret.lisp
; in: DEFUN READ-BINARY-ARRAY-VALUE
; (LET ((CL-POSTGRES::NUM-DIMS (CL-POSTGRES::READ-UINT4 STREAM))
; (CL-POSTGRES::HAS-NULL (CL-POSTGRES::READ-UINT4 STREAM))
; (CL-POSTGRES::ELEMENT-TYPE (CL-POSTGRES::READ-UINT4 STREAM)))
; (COND ((ZEROP CL-POSTGRES::NUM-DIMS) NIL)
; (T
; (LET* (# #)
; (LET #
; #
; CL-POSTGRES::RESULTS)))))
;
; caught STYLE-WARNING:
; The variable HAS-NULL is defined but never used.
; processing (DOLIST (OID #) ...)
; processing (SET-SQL-READER CL-POSTGRES-OID:+RECORD-ARRAY+ ...)
; processing (DEFINE-INTERPRETER CL-POSTGRES-OID:+POINT+ ...)
; processing (DEFINE-INTERPRETER CL-POSTGRES-OID:+LSEG+ ...)
; processing (DEFINE-INTERPRETER CL-POSTGRES-OID:+BOX+ ...)
; processing (DEFINE-INTERPRETER CL-POSTGRES-OID:+FLOAT4+ ...)
; processing (DEFINE-INTERPRETER CL-POSTGRES-OID:+FLOAT8+ ...)
; processing (DEFINE-INTERPRETER CL-POSTGRES-OID:+NUMERIC+ ...)
; processing (DEFUN SET-DATE-READER ...)
; processing (DEFUN INTERPRET-USEC-BITS ...)
; processing (DEFUN SET-INTERVAL-READER ...)
; processing (DEFUN SET-USEC-READER ...)
; processing (DEFUN SET-SQL-DATETIME-READERS ...)
; processing (DEFCONSTANT +START-OF-2000+ ...)
; processing (DEFCONSTANT +SECONDS-IN-DAY+ ...)
; processing (SET-SQL-DATETIME-READERS :DATE ...)
; processing (DEFUN READ-ARRAY-VALUE ...)
; file: /usr/share/common-lisp/source/postmodern/cl-postgres/interpret.lisp
; in: DEFUN READ-ARRAY-VALUE
; (FUNCALL CL-POSTGRES::TRANSFORM CL-POSTGRES::WORD)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TRANSFORM is not known to be a function
; (CHAR CL-POSTGRES::VALUE CL-POSTGRES::POS)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (CHAR CL-POSTGRES::VALUE (INCF CL-POSTGRES::POS))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (CHAR CL-POSTGRES::VALUE CL-POSTGRES::POS)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (CL-POSTGRES::INTERPRET (CL-POSTGRES::WORD)
; (IF (STRING= CL-POSTGRES::WORD "NULL")
; :NULL
; (FUNCALL CL-POSTGRES::TRANSFORM CL-POSTGRES::WORD)))
;
; note: Return type not fixed values, so can't use known return convention:
; *
; processing (DEFUN COPY-SQL-READTABLE ...)
; processing (DEFPARAMETER *DEFAULT-SQL-READTABLE* ...)
; processing (DEFUN DEFAULT-SQL-READTABLE ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/postmodern/cl-postgres/interpret-tmp9HFLKKLP.fasl
; compilation finished in 0:00:00.612
WARNING:
Lisp compilation had style-warnings while
compiling #<CL-SOURCE-FILE "cl-postgres" "cl-postgres" "interpret">
; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/protocol.lisp" (written 26 APR 2018 03:04:31 PM):
; processing (IN-PACKAGE :CL-POSTGRES)
; processing (DEFINE-CONDITION PROTOCOL-ERROR ...)
; processing (DEFMACRO MESSAGE-CASE ...)
; processing (DEFPARAMETER *CONNECTION-PARAMS* ...)
; processing (DEFUN UPDATE-PARAMETER ...)
; processing (DEFUN READ-BYTE-DELIMITED ...)
; processing (DEFINE-CONDITION POSTGRESQL-NOTIFICATION ...)
; processing (DEFUN GET-NOTIFICATION ...)
; processing (DEFUN GET-ERROR ...)
; processing (DEFINE-CONDITION POSTGRESQL-WARNING ...)
; processing (DEFUN GET-WARNING ...)
; processing (DEFPARAMETER *SSL-CERTIFICATE-FILE* ...)
; processing (DEFPARAMETER *SSL-KEY-FILE* ...)
; processing (LET (#) ...)
; processing (DEFUN AUTHENTICATE ...)
; processing (DEFCLASS FIELD-DESCRIPTION ...)
; processing (DEFUN READ-FIELD-DESCRIPTIONS ...)
; processing (DEFUN TERMINATE-CONNECTION ...)
; processing (DEFPARAMETER *EFFECTED-ROWS* ...)
; processing (DEFUN LOOK-FOR-ROW ...)
; processing (DEFUN TRY-TO-SYNC ...)
; processing (DEFMACRO WITH-SYNCING ...)
; processing (DEFMACRO RETURNING-EFFECTED-ROWS ...)
; processing (DEFUN SEND-QUERY ...)
; file: /usr/share/common-lisp/source/postmodern/cl-postgres/protocol.lisp
; in: DEFUN SEND-QUERY
; (MAP 'VECTOR 'CL-POSTGRES::FIELD-BINARY-P CL-POSTGRES::ROW-DESCRIPTION)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR NULL SIMPLE-VECTOR), not a VECTOR.
; (FUNCALL CL-POSTGRES:ROW-READER CL-POSTGRES::SOCKET
; CL-POSTGRES::ROW-DESCRIPTION)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; ROW-READER is not known to be a function
; (CL-POSTGRES::WITH-QUERY (CL-POSTGRES::QUERY)
; (LET ((CL-POSTGRES::ROW-DESCRIPTION NIL))
; (CL-POSTGRES::SIMPLE-PARSE-MESSAGE CL-POSTGRES::SOCKET
; CL-POSTGRES::QUERY)
; (CL-POSTGRES::SIMPLE-DESCRIBE-MESSAGE CL-POSTGRES::SOCKET)
; (CL-POSTGRES::FLUSH-MESSAGE CL-POSTGRES::SOCKET)
; (FORCE-OUTPUT CL-POSTGRES::SOCKET)
; (CL-POSTGRES::MESSAGE-CASE CL-POSTGRES::SOCKET
; (#\1))
; (CL-POSTGRES::MESSAGE-CASE CL-POSTGRES::SOCKET
; (#\t :SKIP))
; (CL-POSTGRES::MESSAGE-CASE CL-POSTGRES::SOCKET
; (#\T (SETF #))
; (#\n))
; (CL-POSTGRES::SIMPLE-BIND-MESSAGE CL-POSTGRES::SOCKET
; (MAP 'VECTOR
; 'CL-POSTGRES::FIELD-BINARY-P
; CL-POSTGRES::ROW-DESCRIPTION))
; (CL-POSTGRES::SIMPLE-EXECUTE-MESSAGE CL-POSTGRES::SOCKET)
; (CL-POSTGRES::SYNC-MESSAGE CL-POSTGRES::SOCKET)
; ...))
; --> MULTIPLE-VALUE-PROG1 WHEN IF FUNCALL
; ==>
; 1
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CL-POSTGRES::MESSAGE-CASE CL-POSTGRES::SOCKET
; (#\t :SKIP))
; --> LABELS #:G22 BLOCK LET CASE LET COND IF IF IF IF IF PROGN
; --> CL-POSTGRES::SKIP-BYTES
; ==>
; (- #:G20 4)
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
; The result is a (VALUES (INTEGER -4 4294967291) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
; The result is a (VALUES (INTEGER -4 4294967291) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
; (CL-POSTGRES::WITH-QUERY (CL-POSTGRES::QUERY)
; (LET ((CL-POSTGRES::ROW-DESCRIPTION NIL))
; (CL-POSTGRES::SIMPLE-PARSE-MESSAGE CL-POSTGRES::SOCKET
; CL-POSTGRES::QUERY)
; (CL-POSTGRES::SIMPLE-DESCRIBE-MESSAGE CL-POSTGRES::SOCKET)
; (CL-POSTGRES::FLUSH-MESSAGE CL-POSTGRES::SOCKET)
; (FORCE-OUTPUT CL-POSTGRES::SOCKET)
; (CL-POSTGRES::MESSAGE-CASE CL-POSTGRES::SOCKET
; (#\1))
; (CL-POSTGRES::MESSAGE-CASE CL-POSTGRES::SOCKET
; (#\t :SKIP))
; (CL-POSTGRES::MESSAGE-CASE CL-POSTGRES::SOCKET
; (#\T (SETF #))
; (#\n))
; (CL-POSTGRES::SIMPLE-BIND-MESSAGE CL-POSTGRES::SOCKET
; (MAP 'VECTOR
; 'CL-POSTGRES::FIELD-BINARY-P
; CL-POSTGRES::ROW-DESCRIPTION))
; (CL-POSTGRES::SIMPLE-EXECUTE-MESSAGE CL-POSTGRES::SOCKET)
; (CL-POSTGRES::SYNC-MESSAGE CL-POSTGRES::SOCKET)
; ...))
; --> MULTIPLE-VALUE-PROG1 WHEN IF FUNCALL
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 61), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 61), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -2305843009213693951 2305843009213693951)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 61), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 61), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -2305843009213693951 2305843009213693951) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST
; T).
; etc.
; processing (DEFUN SEND-PARSE ...)
; file: /usr/share/common-lisp/source/postmodern/cl-postgres/protocol.lisp
; in: DEFUN SEND-PARSE
; (CL-POSTGRES::WITH-QUERY (CL-POSTGRES::QUERY)
; (CL-POSTGRES::PARSE-MESSAGE CL-POSTGRES::SOCKET CL-POSTGRES::NAME
; CL-POSTGRES::QUERY)
; (CL-POSTGRES::FLUSH-MESSAGE CL-POSTGRES::SOCKET)
; (FORCE-OUTPUT CL-POSTGRES::SOCKET)
; (CL-POSTGRES::MESSAGE-CASE CL-POSTGRES::SOCKET
; (#\1)))
; --> MULTIPLE-VALUE-PROG1 WHEN IF FUNCALL
; ==>
; 1
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 61), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 61), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -2305843009213693951 2305843009213693951)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 61), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 61), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -2305843009213693951 2305843009213693951) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST
; T).
; etc.
; processing (DEFUN SEND-CLOSE ...)
; processing (DEFUN SEND-EXECUTE ...)
; file: /usr/share/common-lisp/source/postmodern/cl-postgres/protocol.lisp
; in: DEFUN SEND-EXECUTE
; (MAP 'VECTOR 'CL-POSTGRES::FIELD-BINARY-P CL-POSTGRES::ROW-DESCRIPTION)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR NULL SIMPLE-VECTOR), not a VECTOR.
; (FUNCALL CL-POSTGRES:ROW-READER CL-POSTGRES::SOCKET
; CL-POSTGRES::ROW-DESCRIPTION)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; ROW-READER is not known to be a function
; processing (DEFUN BUILD-ROW-READER ...)
; processing (DEFMACRO ROW-READER ...)
; processing (DEFMACRO DEF-ROW-READER ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/postmodern/cl-postgres/protocol-tmpEHVBI5QP.fasl
; compilation finished in 0:00:00.868
; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/public.lisp" (written 26 APR 2018 03:04:31 PM):
; processing (IN-PACKAGE :CL-POSTGRES)
; processing (DEFCLASS DATABASE-CONNECTION ...)
; processing (DEFUN CONNECTION-META ...)
; processing (DEFUN DATABASE-OPEN-P ...)
; processing (DEFUN OPEN-DATABASE ...)
; processing (PROGN (DEFPARAMETER *UNIX-SOCKET-DIR* ...) ...)
; processing (DEFUN GET-HOST-ADDRESS ...)
; processing (DEFUN INET-SOCKET-CONNECT ...)
; processing (DEFUN INITIATE-CONNECTION ...)
; file: /usr/share/common-lisp/source/postmodern/cl-postgres/public.lisp
; in: DEFUN INITIATE-CONNECTION
; (CL-POSTGRES::ASSERT-UNIX)
;
; note: deleting unreachable code
; processing (DEFUN REOPEN-DATABASE ...)
; processing (DEFUN ENSURE-CONNECTION ...)
; processing (DEFUN CLOSE-DATABASE ...)
; processing (DEFMACRO USING-CONNECTION ...)
; processing (DEFMACRO WITH-RECONNECT-RESTART ...)
; processing (DEFUN WAIT-FOR-NOTIFICATION ...)
; processing (DEFUN EXEC-QUERY ...)
; processing (DEFUN PREPARE-QUERY ...)
; processing (DEFUN UNPREPARE-QUERY ...)
; processing (DEFUN EXEC-PREPARED ...)
; processing (DEF-ROW-READER ALIST-ROW-READER ...)
; processing (DEF-ROW-READER LIST-ROW-READER ...)
; processing (DEF-ROW-READER VECTOR-ROW-READER ...)
; processing (DEF-ROW-READER IGNORE-ROW-READER ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/postmodern/cl-postgres/public-tmp7ACGYN6Z.fasl
; compilation finished in 0:00:00.468
; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/bulk-copy.lisp" (written 26 APR 2018 03:04:31 PM):
; processing (IN-PACKAGE :CL-POSTGRES)
; processing (DEFCLASS BULK-COPIER ...)
; processing (DEFMETHOD PRINT-OBJECT ...)
; processing (DEFUN OPEN-DB-WRITER ...)
; processing (DEFUN CLOSE-DB-WRITER ...)
; processing (DEFUN DB-WRITE-ROW ...)
; processing (DEFUN COPY-QUERY ...)
; processing (DEFUN SEND-COPY-START ...)
; processing (DEFUN INITIALIZE-COPIER ...)
; processing (DEFUN COPIER-WRITE-VALUE ...)
; processing (DEFUN COPIER-WRITE-SEQUENCE ...)
; processing (DEFMETHOD PREPARE-ROW ...)
; processing (DEFUN SEND-COPY-DONE ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/postmodern/cl-postgres/bulk-copy-tmpROQG4ZG5.fasl
; compilation finished in 0:00:00.544
; compiling file "/usr/share/common-lisp/source/postmodern/s-sql/s-sql.lisp" (written 26 APR 2018 03:04:31 PM):
; processing (DEFPACKAGE :S-SQL ...)
; processing (IN-PACKAGE :S-SQL)
; processing (DEFINE-CONDITION SQL-ERROR ...)
; processing (DEFUN SQL-ERROR ...)
; processing (DEFUN STRCAT ...)
; processing (DEFUN IMPLODE ...)
; processing (DEFUN SPLIT-ON-KEYWORDS% ...)
; processing (DEFMACRO SPLIT-ON-KEYWORDS ...)
; processing (DEFPARAMETER *POSTGRES-RESERVED-WORDS* ...)
; processing (DEFPARAMETER *ESCAPE-SQL-NAMES-P* ...)
; processing (DEFVAR *DOWNCASE-SYMBOLS* ...)
; processing (DEFUN TO-SQL-NAME ...)
; file: /usr/share/common-lisp/source/postmodern/s-sql/s-sql.lisp
; in: DEFUN TO-SQL-NAME
; (STRING S-SQL::NAME)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING.
; (CHAR S-SQL::STR S-SQL::I)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (CHAR-DOWNCASE (CHAR S-SQL::STR S-SQL::I))
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; (CHAR S-SQL::STR S-SQL::I)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; processing (DEFUN FROM-SQL-NAME ...)
; processing (DEFTYPE SMALLINT ...)
; processing (DEFTYPE BIGINT ...)
; processing (DEFTYPE NUMERIC ...)
; processing (DEFTYPE DOUBLE-PRECISION ...)
; processing (DEFTYPE BYTEA ...)
; processing (DEFTYPE TEXT ...)
; processing (DEFTYPE VARCHAR ...)
; processing (DEFTYPE SERIAL ...)
; processing (DEFTYPE SERIAL8 ...)
; processing (DEFTYPE DB-NULL ...)
; processing (DEFGENERIC SQL-TYPE-NAME ...)
; processing (DEFUN TO-TYPE-NAME ...)
; processing (DEFPARAMETER *STANDARD-SQL-STRINGS* ...)
; processing (DEFUN SQL-ESCAPE-STRING ...)
; processing (DEFGENERIC SQL-ESCAPE ...)
; processing (DEFPARAMETER *EXPAND-RUNTIME* ...)
; processing (DEFUN SQL-EXPAND ...)
; processing (DEFUN SQL-EXPAND-LIST ...)
; processing (DEFUN SQL-EXPAND-NAMES ...)
; processing (DEFUN REDUCE-STRINGS ...)
; processing (DEFMACRO SQL ...)
; processing (DEFUN SQL-COMPILE ...)
; processing (DEFUN SQL-TEMPLATE ...)
; processing (DEFUN S-SQL-READER ...)
; processing (DEFUN ENABLE-S-SQL-SYNTAX ...)
; processing (DEFGENERIC EXPAND-SQL-OP ...)
; processing (DEFMACRO DEF-SQL-OP ...)
; processing (DEFUN MAKE-EXPANDER ...)
; processing (DEFMACRO REGISTER-SQL-OPERATORS ...)
; processing (REGISTER-SQL-OPERATORS :UNARY ...)
; processing (REGISTER-SQL-OPERATORS :N-ARY ...)
; processing (REGISTER-SQL-OPERATORS :N-OR-UNARY ...)
; processing (REGISTER-SQL-OPERATORS :2+-ARY ...)
; processing (REGISTER-SQL-OPERATORS :2+-ARY ...)
; processing (REGISTER-SQL-OPERATORS :2+-ARY ...)
; processing (DEF-SQL-OP :|| ...)
; processing (DEF-SQL-OP :DESC ...)
; processing (DEF-SQL-OP :NULLS-FIRST ...)
; processing (DEF-SQL-OP :NULLS-LAST ...)
; processing (DEF-SQL-OP :AS ...)
; processing (DEF-SQL-OP :@@ ...)
; processing (DEF-SQL-OP :DISTINCT ...)
; processing (DEF-SQL-OP :ANY* ...)
; processing (DEF-SQL-OP :ANY ...)
; processing (DEF-SQL-OP :ALL ...)
; processing (DEF-SQL-OP :ARRAY ...)
; processing (DEF-SQL-OP :CAST ...)
; processing (DEF-SQL-OP :EXISTS ...)
; processing (DEF-SQL-OP :IS-NULL ...)
; processing (DEF-SQL-OP :NOT-NULL ...)
; processing (DEF-SQL-OP :IN ...)
; processing (DEF-SQL-OP :NOT-IN ...)
; processing (DEF-SQL-OP :EXTRACT ...)
; processing (DEF-SQL-OP :COUNT ...)
; processing (DEF-SQL-OP :BETWEEN ...)
; processing (DEF-SQL-OP :BETWEEN-SYMMETRIC ...)
; processing (DEF-SQL-OP :CASE ...)
; processing (DEF-SQL-OP :[] ...)
; processing (DEF-SQL-OP :SET ...)
; processing (DEF-SQL-OP :DOT ...)
; processing (DEF-SQL-OP :TYPE ...)
; processing (DEF-SQL-OP :RAW ...)
; processing (DEFUN EXPAND-JOINS ...)
; processing (DEF-SQL-OP :SELECT ...)
; processing (DEF-SQL-OP :LIMIT ...)
; processing (DEF-SQL-OP :ORDER-BY ...)
; processing (DEF-SQL-OP :SET-CONSTRAINTS ...)
; processing (DEFUN FOR-UPDATE/SHARE ...)
; processing (DEF-SQL-OP :FOR-UPDATE ...)
; processing (DEF-SQL-OP :FOR-SHARE ...)
; processing (DEFUN ESCAPE-SQL-EXPRESSION ...)
; processing (DEF-SQL-OP :FUNCTION ...)
; processing (DEF-SQL-OP :INSERT-INTO ...)
; processing (DEF-SQL-OP :LISTEN ...)
; processing (DEF-SQL-OP :UNLISTEN ...)
; processing (DEF-SQL-OP :NOTIFY ...)
; processing (DEFUN EXPAND-ROWS ...)
; processing (DEF-SQL-OP :INSERT-ROWS-INTO ...)
; processing (DEF-SQL-OP :UPDATE ...)
; processing (DEF-SQL-OP :DELETE-FROM ...)
; processing (DEF-SQL-OP :OVER ...)
; processing (DEF-SQL-OP :PARTITION-BY ...)
; processing (DEF-SQL-OP :PARENS ...)
; processing (DEF-SQL-OP :WITH ...)
; processing (DEF-SQL-OP :WITH-RECURSIVE ...)
; processing (DEF-SQL-OP :WINDOW ...)
; processing (DEFUN DISSECT-TYPE ...)
; processing (DEFUN EXPAND-FOREIGN-ON* ...)
; processing (DEFUN %BUILD-FOREIGN-REFERENCE ...)
; processing (DEFUN EXPAND-TABLE-CONSTRAINT ...)
; processing (DEFUN EXPAND-EXTENDED-TABLE-CONSTRAINT ...)
; processing (DEFUN EXPAND-TABLE-COLUMN ...)
; processing (DEF-SQL-OP :CREATE-TABLE ...)
; processing (DEF-SQL-OP :CREATE-TABLE-FULL ...)
; processing (DEF-SQL-OP :ALTER-TABLE ...)
; processing (DEF-SQL-OP :ALTER-SEQUENCE ...)
; processing (DEFUN EXPAND-CREATE-INDEX ...)
; processing (DEF-SQL-OP :CREATE-INDEX ...)
; processing (DEF-SQL-OP :CREATE-UNIQUE-INDEX ...)
; processing (DEF-SQL-OP :CASCADE ...)
; processing (DEFMACRO DEF-DROP-OP ...)
; processing (DEF-DROP-OP :DROP-TABLE ...)
; processing (DEF-DROP-OP :DROP-INDEX ...)
; processing (DEF-DROP-OP :DROP-SEQUENCE ...)
; processing (DEF-DROP-OP :DROP-VIEW ...)
; processing (DEF-DROP-OP :DROP-TYPE ...)
; processing (DEF-DROP-OP :DROP-RULE ...)
; processing (DEFUN DEQUOTE ...)
; processing (DEF-SQL-OP :NEXTVAL ...)
; processing (DEF-SQL-OP :CURRVAL ...)
; processing (DEF-SQL-OP :CREATE-SEQUENCE ...)
; processing (DEF-SQL-OP :CREATE-VIEW ...)
; processing (DEF-SQL-OP :CREATE-ENUM ...)
; processing (DEF-SQL-OP :CREATE-DOMAIN ...)
; processing (DEF-SQL-OP :DROP-DOMAIN ...)
; processing (DEF-SQL-OP :CREATE-RULE ...)
; processing (DEF-SQL-OP :CREATE-DATABASE ...)
; processing (DEF-DROP-OP :DROP-DATABASE ...)
; processing (DEF-SQL-OP :CREATE-ROLE ...)
; processing (DEF-DROP-OP :DROP-ROLE ...)
; processing (DEF-SQL-OP :COPY ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/postmodern/s-sql/s-sql-tmpL8QH2EDP.fasl
; compilation finished in 0:00:03.296
; compiling file "/usr/share/common-lisp/source/closer-mop/closer-mop-packages.lisp" (written 29 OCT 2020 06:18:14 PM):
; processing (IN-PACKAGE :CL-USER)
; processing (DEFPACKAGE #:CLOSER-MOP ...)
; processing (IN-PACKAGE :CLOSER-MOP)
; processing (MACROLET (#) ...)
; processing (DEFPACKAGE #:CLOSER-COMMON-LISP-USER ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/closer-mop/closer-mop-packages-tmpGMP33JVN.fasl
; compilation finished in 0:00:00.192
; compiling file "/usr/share/common-lisp/source/closer-mop/closer-mop-shared.lisp" (written 29 OCT 2020 06:18:14 PM):
; processing (IN-PACKAGE :CLOSER-MOP)
; processing (DEFUN REQUIRED-ARGS ...)
; processing (DEFUN ENSURE-FINALIZED ...)
; processing (DEFUN SUBCLASSP ...)
; processing (PROGN (DEFCLASS STANDARD-GENERIC-FUNCTION ...) ...)
; file: /usr/share/common-lisp/source/closer-mop/closer-mop-shared.lisp
; in:
; COMMON-LISP:DEFMETHOD COMPUTE-EFFECTIVE-METHOD-FUNCTION (GENERIC-FUNCTION T T)
; (CLOSER-MOP::TRANSFORM-EFFECTIVE-METHOD (CLOSER-MOP::FORM)
; (IF (ATOM CLOSER-MOP::FORM)
; CLOSER-MOP::FORM
; (CASE (CAR CLOSER-MOP::FORM)
; (CALL-METHOD (CLOSER-MOP::TRANSFORM-EFFECTIVE-METHOD #))
; (MAKE-METHOD
; (WHEN # #)
; (LET #
; #))
; (T (MAPCAR #'CLOSER-MOP::TRANSFORM-EFFECTIVE-METHOD #)))))
;
; note: Return type not fixed values, so can't use known return convention:
; *
; in: DEFUN GET-EMF
; (SUBSEQ CLOSER-MOP::ARGS 0 CLOSER-MOP::NOF-REQUIRED-ARGS)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a LIST.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE.
; in: DEFUN ONLY-STANDARD-METHODS
; (TYPEP CLOSER-MOP::GF SB-MOP:SPECIALIZER)
;
; note: unable to optimize because: can't open-code test of non-constant type
; (EQL (SB-MOP:EQL-SPECIALIZER-OBJECT SB-MOP:SPECIALIZER) CLOSER-MOP::GF)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a T, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The second argument is a T, not a (UNSIGNED-BYTE 32).
; etc.
; in: DEFUN METHODS-ALL-THE-SAME-SPECIALIZERS
; (EQL (SB-MOP:EQL-SPECIALIZER-OBJECT CLOSER-MOP::SPEC1)
; (SB-MOP:EQL-SPECIALIZER-OBJECT CLOSER-MOP::SPEC2))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a T, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The second argument is a T, not a (UNSIGNED-BYTE 32).
; etc.
; in: DEFUN COMPUTE-DISCRIMINATOR
; (FUNCALL CLOSER-MOP::COMPUTE-NATIVE-DISCRIMINATOR)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; COMPUTE-NATIVE-DISCRIMINATOR is not known to be a function
; (TYPEP CLOSER-MOP::ARG CLOSER-MOP::SPEC)
;
; note: unable to optimize because: can't open-code test of non-constant type
; (EQL CLOSER-MOP::ARG (SB-MOP:EQL-SPECIALIZER-OBJECT CLOSER-MOP::SPEC))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
; (FUNCALL CLOSER-MOP::COMPUTE-NATIVE-DISCRIMINATOR)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; COMPUTE-NATIVE-DISCRIMINATOR is not known to be a function
; (EQL CLOSER-MOP::ARG (SB-MOP:EQL-SPECIALIZER-OBJECT CLOSER-MOP::SPEC))
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a T, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 32).
; The second argument is a T, not a (UNSIGNED-BYTE 32).
; etc.
; processing (DEFUN ENSURE-METHOD ...)
; processing (DEFVAR *STANDARD-SLOT-KEYS* ...)
; processing (DEFUN FIX-SLOT-INITARGS ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/closer-mop/closer-mop-shared-tmpYZLZO5XO.fasl
; compilation finished in 0:00:00.580
; compiling file "/usr/share/common-lisp/source/closer-mop/closer-sbcl.lisp" (written 29 OCT 2020 06:18:14 PM):
; processing (IN-PACKAGE :CLOSER-MOP)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/closer-mop/closer-sbcl-tmpHJEGXRNO.fasl
; compilation finished in 0:00:00.012
; compiling file "/usr/share/common-lisp/source/postmodern/postmodern/package.lisp" (written 26 APR 2018 03:04:31 PM):
; processing (DEFPACKAGE :POSTMODERN ...)
; processing (IN-PACKAGE :POSTMODERN)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/postmodern/postmodern/package-tmpLNAWKPET.fasl
; compilation finished in 0:00:00.008
; compiling file "/usr/share/common-lisp/source/postmodern/postmodern/connect.lisp" (written 26 APR 2018 03:04:31 PM):
; processing (IN-PACKAGE :POSTMODERN)
; processing (DEFCLASS POOLED-DATABASE-CONNECTION ...)
; processing (DEFPARAMETER *DATABASE* ...)
; processing (DEFPARAMETER *DEFAULT-USE-SSL* ...)
; processing (DEFUN CONNECT ...)
; processing (DEFUN CONNECTED-P ...)
; processing (DEFUN CONNECT-TOPLEVEL ...)
; processing (DEFGENERIC DISCONNECT ...)
; processing (DEFGENERIC RECONNECT ...)
; processing (DEFUN DISCONNECT-TOPLEVEL ...)
; processing (DEFUN CALL-WITH-CONNECTION ...)
; processing (DEFMACRO WITH-CONNECTION ...)
; processing (DEFVAR *MAX-POOL-SIZE* ...)
; processing (DEFVAR *CONNECTION-POOLS* ...)
; processing (DEFVAR *POOL-LOCK* ...)
; processing (DEFMACRO WITH-POOL-LOCK ...)
; processing (DEFUN GET-FROM-POOL ...)
; processing (DEFMETHOD DISCONNECT ...)
; processing (DEFUN CLEAR-CONNECTION-POOL ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/postmodern/postmodern/connect-tmpJAVYBOA5.fasl
; compilation finished in 0:00:00.240
; compiling file "/usr/share/common-lisp/source/postmodern/postmodern/query.lisp" (written 26 APR 2018 03:04:31 PM):
; processing (IN-PACKAGE :POSTMODERN)
; processing (DEF-ROW-READER SYMBOL-ALIST-ROW-READER ...)
; processing (DEF-ROW-READER SYMBOL-PLIST-ROW-READER ...)
; processing (DEF-ROW-READER COLUMN-ROW-READER ...)
; processing (DEFVAR *CLASS-FINALIZE-LOCK* ...)
; processing (DEFPARAMETER *RESULT-STYLES* ...)
; processing (DEFUN DAO-SPEC-FOR-FORMAT ...)
; processing (DEFUN READER-FOR-FORMAT ...)
; processing (DEFMACRO ALL-ROWS ...)
; processing (DEFMACRO SINGLE-ROW ...)
; processing (DEFMACRO SINGLE-ROW! ...)
; processing (DEFUN REAL-QUERY ...)
; processing (DEFMACRO QUERY ...)
; processing (DEFMACRO EXECUTE ...)
; processing (DEFMACRO DOQUERY ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/postmodern/postmodern/query-tmp4JWQGV5Z.fasl
; compilation finished in 0:00:00.280
; compiling file "/usr/share/common-lisp/source/postmodern/postmodern/prepare.lisp" (written 26 APR 2018 03:04:31 PM):
; processing (IN-PACKAGE :POSTMODERN)
; processing (DEFUN ENSURE-PREPARED ...)
; processing (LET (#) ...)
; processing (DEFUN GENERATE-PREPARED ...)
; processing (DEFMACRO PREPARE ...)
; processing (DEFMACRO DEFPREPARED ...)
; processing (DEFMACRO DEFPREPARED-WITH-NAMES ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/postmodern/postmodern/prepare-tmpPQD2HT0O.fasl
; compilation finished in 0:00:00.088
; compiling file "/usr/share/common-lisp/source/postmodern/postmodern/util.lisp" (written 26 APR 2018 03:04:31 PM):
; processing (IN-PACKAGE :POSTMODERN)
; processing (DEFUN TO-IDENTIFIER ...)
; processing (DEFUN SEQUENCE-NEXT ...)
; processing (DEFMACRO MAKE-LIST-QUERY ...)
; processing (DEFMACRO MAKE-EXISTS-QUERY ...)
; processing (DEFUN LIST-TABLES ...)
; processing (DEFUN TABLE-EXISTS-P ...)
; processing (DEFUN LIST-SEQUENCES ...)
; processing (DEFUN SEQUENCE-EXISTS-P ...)
; processing (DEFUN LIST-VIEWS ...)
; processing (DEFUN VIEW-EXISTS-P ...)
; processing (DEFUN TABLE-DESCRIPTION ...)
; processing (DEFUN COALESCE ...)
; processing (DEFUN DATABASE-VERSION ...)
; processing (DEFUN NUM-RECORDS-IN-DATABASE ...)
; processing (DEFUN CURRENT-DATABASE ...)
; processing (DEFUN DATABASE-EXISTS-P ...)
; processing (DEFUN DATABASE-SIZE ...)
; processing (DEFUN LIST-DATABASES ...)
; processing (DEFUN LIST-SCHEMAS ...)
; processing (DEFUN LIST-TABLESPACES ...)
; processing (DEFUN LIST-AVAILABLE-TYPES ...)
; processing (DEFUN LIST-TABLE-SIZES ...)
; processing (DEFUN TABLE-SIZE ...)
; processing (DEFUN MORE-TABLE-INFO ...)
; processing (DEFUN LIST-COLUMNS ...)
; processing (DEFUN LIST-COLUMNS-WITH-TYPES ...)
; processing (DEFUN COLUMN-EXISTS-P ...)
; processing (DEFUN DESCRIBE-VIEWS ...)
; processing (DEFUN LIST-DATABASE-FUNCTIONS ...)
; processing (DEFUN LIST-INDICES ...)
; processing (DEFUN LIST-TABLE-INDICES ...)
; processing (DEFUN LIST-INDEXED-COLUMN-AND-ATTRIBUTES ...)
; processing (DEFUN LIST-INDEX-DEFINITIONS ...)
; processing (DEFUN LIST-FOREIGN-KEYS ...)
; processing (DEFUN LIST-UNIQUE-OR-PRIMARY-CONSTRAINTS ...)
; processing (DEFUN LIST-ALL-CONSTRAINTS ...)
; processing (DEFUN DESCRIBE-CONSTRAINT ...)
; processing (DEFUN DESCRIBE-FOREIGN-KEY-CONSTRAINTS ...)
; processing (DEFUN LIST-TRIGGERS ...)
; processing (DEFUN LIST-DETAILED-TRIGGERS ...)
; processing (DEFUN LIST-DATABASE-USERS ...)
; processing (DEFUN CHANGE-TOPLEVEL-DATABASE ...)
; processing (DEFUN LIST-CONNECTIONS ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/postmodern/postmodern/util-tmpH1FK4I19.fasl
; compilation finished in 0:00:00.540
; compiling file "/usr/share/common-lisp/source/postmodern/postmodern/transaction.lisp" (written 26 APR 2018 03:04:31 PM):
; processing (IN-PACKAGE :POSTMODERN)
; processing (DEFPARAMETER *TRANSACTION-LEVEL* ...)
; processing (DEFPARAMETER *CURRENT-LOGICAL-TRANSACTION* ...)
; processing (DEFCLASS TRANSACTION-HANDLE ...)
; processing (DEFUN CALL-WITH-TRANSACTION ...)
; processing (DEFMACRO WITH-TRANSACTION ...)
; processing (DEFUN ABORT-TRANSACTION ...)
; processing (DEFUN COMMIT-TRANSACTION ...)
; processing (DEFCLASS SAVEPOINT-HANDLE ...)
; processing (DEFUN CALL-WITH-SAVEPOINT ...)
; processing (DEFMACRO WITH-SAVEPOINT ...)
; processing (DEFUN ROLLBACK-SAVEPOINT ...)
; processing (DEFUN RELEASE-SAVEPOINT ...)
; processing (DEFUN CALL-WITH-LOGICAL-TRANSACTION ...)
; processing (DEFMACRO WITH-LOGICAL-TRANSACTION ...)
; processing (DEFMETHOD ABORT-LOGICAL-TRANSACTION ...)
; processing (DEFMETHOD ABORT-LOGICAL-TRANSACTION ...)
; processing (DEFMETHOD COMMIT-LOGICAL-TRANSACTION ...)
; processing (DEFMETHOD COMMIT-LOGICAL-TRANSACTION ...)
; processing (DEFUN CALL-WITH-ENSURED-TRANSACTION ...)
; processing (DEFMACRO ENSURE-TRANSACTION ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/postmodern/postmodern/transaction-tmpOGMGFZE8.fasl
; compilation finished in 0:00:00.196
; compiling file "/usr/share/common-lisp/source/postmodern/postmodern/namespace.lisp" (written 26 APR 2018 03:04:31 PM):
; processing (IN-PACKAGE :POSTMODERN)
; processing (DEFMACRO WITH-SCHEMA ...)
; processing (DEFUN DO-WITH-SCHEMA ...)
; processing (DEFUN GET-SEARCH-PATH ...)
; processing (DEFUN SET-SEARCH-PATH ...)
; processing (DEFUN LIST-SCHEMATA ...)
; processing (DEFUN SCHEMA-EXIST-P ...)
; processing (DEFUN SCHEMA-EXISTS-P ...)
; processing (DEFUN CREATE-SCHEMA ...)
; processing (DEFUN DROP-SCHEMA ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/postmodern/postmodern/namespace-tmpP2P3SY1J.fasl
; compilation finished in 0:00:00.120
; compiling file "/usr/share/common-lisp/source/postmodern/postmodern/table.lisp" (written 26 APR 2018 03:04:31 PM):
; processing (IN-PACKAGE :POSTMODERN)
; processing (DEFCLASS DAO-CLASS ...)
; processing (DEFMETHOD DAO-KEYS ...)
; processing (DEFMETHOD VALIDATE-SUPERCLASS ...)
; processing (DEFMETHOD DAO-KEYS ...)
; processing (DEFMETHOD DAO-KEYS ...)
; processing (DEFUN DAO-COLUMN-SLOTS ...)
; file: /usr/share/common-lisp/source/postmodern/postmodern/table.lisp
; in: DEFUN DAO-COLUMN-SLOTS
; 'POSTMODERN::EFFECTIVE-COLUMN-SLOT
;
; note: can't open-code test of unknown type EFFECTIVE-COLUMN-SLOT
; processing (DEFUN DAO-COLUMN-FIELDS ...)
; processing (DEFUN DAO-TABLE-NAME ...)
; processing (DEFMETHOD SHARED-INITIALIZE ...)
; processing (DEFUN DAO-SUPERCLASSES ...)
; processing (DEFMETHOD FINALIZE-INHERITANCE ...)
; processing (DEFCLASS DIRECT-COLUMN-SLOT ...)
; processing (DEFMETHOD SHARED-INITIALIZE ...)
; processing (DEFMETHOD DIRECT-SLOT-DEFINITION-CLASS ...)
; processing (DEFPARAMETER *DIRECT-COLUMN-SLOT* ...)
; processing (DEFCLASS EFFECTIVE-COLUMN-SLOT ...)
; processing (DEFMETHOD COMPUTE-EFFECTIVE-SLOT-DEFINITION ...)
; processing (DEFMETHOD EFFECTIVE-SLOT-DEFINITION-CLASS ...)
; processing (DEFGENERIC DAO-EXISTS-P ...)
; processing (DEFGENERIC INSERT-DAO ...)
; processing (DEFGENERIC UPDATE-DAO ...)
; processing (DEFGENERIC DELETE-DAO ...)
; processing (DEFGENERIC UPSERT-DAO ...)
; processing (DEFGENERIC GET-DAO ...)
; processing (DEFGENERIC MAKE-DAO ...)
; processing (DEFMACRO DEFINE-DAO-FINALIZATION ...)
; processing (DEFGENERIC FETCH-DEFAULTS ...)
; processing (DEFUN %EVAL ...)
; processing (DEFUN BUILD-DAO-METHODS ...)
; processing (DEFPARAMETER *CUSTOM-COLUMN-WRITERS* ...)
; processing (DEFMACRO WITH-COLUMN-WRITERS ...)
; processing (DEFPARAMETER *IGNORE-UNKNOWN-COLUMNS* ...)
; processing (DEFUN DAO-FROM-FIELDS ...)
; processing (DEFUN DAO-ROW-READER ...)
; processing (DEFUN SAVE-DAO ...)
; processing (DEFUN SAVE-DAO/TRANSACTION ...)
; processing (DEFUN QUERY-DAO% ...)
; processing (DEFMACRO QUERY-DAO ...)
; processing (DEFMACRO DAO-ROW-READER-WITH-BODY ...)
; processing (DEFMACRO DO-QUERY-DAO ...)
; processing (DEFUN GENERATE-DAO-QUERY ...)
; processing (DEFMACRO SELECT-DAO ...)
; processing (DEFMACRO DO-SELECT-DAO ...)
; processing (DEFUN DAO-TABLE-DEFINITION ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/postmodern/postmodern/table-tmpH6YIZTI1.fasl
; compilation finished in 0:00:00.732
; compiling file "/usr/share/common-lisp/source/postmodern/postmodern/deftable.lisp" (written 26 APR 2018 03:04:31 PM):
; processing (IN-PACKAGE :POSTMODERN)
; processing (DEFVAR *TABLE-NAME*)
; processing (SETF (DOCUMENTATION # ...) ...)
; processing (DEFVAR *TABLE-SYMBOL*)
; processing (SETF (DOCUMENTATION # ...) ...)
; processing (DEFVAR *TABLES* ...)
; processing (DEFUN ADD-TABLE-DEFINITION ...)
; processing (DEFMACRO DEFTABLE ...)
; processing (DEFUN CREATE-TABLE ...)
; processing (DEFUN CREATE-ALL-TABLES ...)
; processing (DEFUN CREATE-PACKAGE-TABLES ...)
; processing (DEFUN FLAT-TABLE-NAME ...)
; processing (LABELS (# #) ...)
; processing (DEFUN !DAO-DEF ...)
; processing (DEFUN !FOREIGN ...)
; processing (DEFUN !UNIQUE ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/postmodern/postmodern/deftable-tmpSJEPG7AU.fasl
; compilation finished in 0:00:00.204
; compiling file "/usr/share/common-lisp/source/postmodern/simple-date/simple-date.lisp" (written 26 APR 2018 03:04:31 PM):
; processing (DEFPACKAGE :SIMPLE-DATE ...)
; processing (IN-PACKAGE :SIMPLE-DATE)
; processing (DEFUN TO-EXTERNAL-DATE ...)
; processing (DEFUN TO-INTERNAL-DATE ...)
; processing (LET (#) ...)
; processing (DEFUN MONTH-AT-DAY ...)
; processing (DEFCONSTANT +DAYS-IN-400-YEARS+ ...)
; processing (DEFCONSTANT +DAYS-IN-100-YEARS+ ...)
; processing (DEFCONSTANT +DAYS-IN-4-YEARS+ ...)
; processing (DEFCONSTANT +DAYS-IN-YEAR+ ...)
; processing (DEFCONSTANT +MILLISECS-IN-DAY+ ...)
; processing (DEFUN ENCODE-DAYS ...)
; processing (DEFUN DECODE-DAYS ...)
; processing (DEFUN ENCODE-MILLISECS ...)
; processing (DEFUN DECODE-MILLISECS ...)
; processing (DEFUN LEAP-YEAR-P ...)
; processing (DEFUN DAYS-IN-MONTH ...)
; processing (DEFUN NORMALIZE-TIMESTAMP ...)
; processing (DEFUN DATE-ADD ...)
; processing (DEFUN INVERT-INTERVAL ...)
; processing (DEFCLASS DATE ...)
; processing (DEFMETHOD PRINT-OBJECT ...)
; processing (DEFUN ENCODE-DATE ...)
; processing (DEFUN DECODE-DATE ...)
; processing (DEFUN DAY-OF-WEEK ...)
; processing (DEFCLASS TIME-OF-DAY ...)
; processing (DEFMETHOD PRINT-OBJECT ...)
; processing (DEFUN ENCODE-TIME-OF-DAY ...)
; processing (DEFUN DECODE-TIME-OF-DAY ...)
; processing (DEFCLASS TIMESTAMP ...)
; processing (DEFMETHOD PRINT-OBJECT ...)
; processing (DEFUN ENCODE-TIMESTAMP ...)
; processing (DEFUN DECODE-TIMESTAMP ...)
; processing (DEFCONSTANT +UNIVERSAL-TIME-OFFSET+ ...)
; processing (DEFUN TIMESTAMP-TO-UNIVERSAL-TIME ...)
; processing (DEFUN UNIVERSAL-TIME-TO-TIMESTAMP ...)
; processing (DEFCLASS INTERVAL ...)
; processing (DEFMETHOD PRINT-OBJECT ...)
; processing (DEFUN ENCODE-INTERVAL ...)
; processing (DEFUN DECODE-INTERVAL ...)
; processing (DEFGENERIC TIME-ADD ...)
; processing (DEFMETHOD TIME-ADD ...)
; processing (DEFMETHOD TIME-ADD ...)
; processing (DEFMETHOD TIME-ADD ...)
; processing (DEFMETHOD TIME-ADD ...)
; processing (DEFMETHOD TIME-ADD ...)
; processing (DEFMETHOD TIME-ADD ...)
; processing (DEFMETHOD TIME-ADD ...)
; processing (DEFMETHOD TIME-ADD ...)
; processing (DEFMETHOD TIME-ADD ...)
; processing (DEFMETHOD TIME-ADD ...)
; processing (DEFGENERIC TIME-SUBTRACT ...)
; processing (DEFMETHOD TIME-SUBTRACT ...)
; processing (DEFMETHOD TIME-SUBTRACT ...)
; processing (DEFMETHOD TIME-SUBTRACT ...)
; processing (DEFMETHOD TIME-SUBTRACT ...)
; processing (DEFMETHOD TIME-SUBTRACT ...)
; processing (DEFMETHOD TIME-SUBTRACT ...)
; processing (DEFMETHOD TIME-SUBTRACT ...)
; processing (DEFMETHOD TIME-SUBTRACT ...)
; processing (DEFGENERIC TIME= ...)
; processing (DEFMETHOD TIME= ...)
; processing (DEFMETHOD TIME= ...)
; processing (DEFMETHOD TIME= ...)
; processing (DEFMETHOD TIME= ...)
; processing (DEFMETHOD TIME= ...)
; processing (DEFMETHOD TIME= ...)
; processing (DEFGENERIC TIME< ...)
; processing (DEFMETHOD TIME< ...)
; processing (DEFMETHOD TIME< ...)
; processing (DEFMETHOD TIME< ...)
; processing (DEFMETHOD TIME< ...)
; processing (DEFMETHOD TIME< ...)
; processing (DEFGENERIC TIME> ...)
; processing (DEFMETHOD TIME> ...)
; processing (DEFMETHOD TIME> ...)
; processing (DEFMETHOD TIME> ...)
; processing (DEFMETHOD TIME> ...)
; processing (DEFMETHOD TIME> ...)
; processing (DEFUN TIME<= ...)
; processing (DEFUN TIME>= ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/postmodern/simple-date/simple-date-tmpSNZATJRM.fasl
; compilation finished in 0:00:00.820
; compiling file "/usr/share/common-lisp/source/ironclad/src/package.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (DEFPACKAGE :IRONCLAD ...)
; processing (IN-PACKAGE :CRYPTO)
; processing (DEFUN ARRAY-READER ...)
; processing (DEFPARAMETER *IRONCLAD-READTABLE* ...)
; processing (DEFMACRO IN-IRONCLAD-READTABLE ...)
; processing (DEFUN IRONCLAD-IMPLEMENTATION-FEATURES ...)
; processing (DOLIST (F #) ...)
; processing (PUSHNEW :IRONCLAD-ASSEMBLY ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/package-tmpK93FRK93.fasl
; compilation finished in 0:00:00.052
; compiling file "/usr/share/common-lisp/source/ironclad/src/conditions.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :IRONCLAD)
; processing (DEFINE-CONDITION IRONCLAD-ERROR ...)
; processing (DEFINE-CONDITION KEY-NOT-SUPPLIED ...)
; processing (DEFINE-CONDITION INITIALIZATION-VECTOR-NOT-SUPPLIED ...)
; processing (DEFINE-CONDITION INVALID-INITIALIZATION-VECTOR ...)
; processing (DEFINE-CONDITION INVALID-KEY-LENGTH ...)
; processing (DEFINE-CONDITION UNSUPPORTED-CIPHER ...)
; processing (DEFINE-CONDITION UNSUPPORTED-MODE ...)
; processing (DEFINE-CONDITION UNSUPPORTED-PADDING ...)
; processing (DEFINE-CONDITION UNSUPPORTED-DIGEST ...)
; processing (DEFINE-CONDITION UNSUPPORTED-MAC ...)
; processing (DEFINE-CONDITION UNSUPPORTED-KDF ...)
; processing (DEFINE-CONDITION UNSUPPORTED-SCRYPT-COST-FACTORS ...)
; processing (DEFINE-CONDITION UNSUPPORTED-ARGON2-PARAMETERS ...)
; file: /usr/share/common-lisp/source/ironclad/src/conditions.lisp
; in: DEFINE-CONDITION UNSUPPORTED-ARGON2-PARAMETERS
; (DEFINE-CONDITION IRONCLAD:UNSUPPORTED-ARGON2-PARAMETERS
; (IRONCLAD:IRONCLAD-ERROR)
; NIL
; (:REPORT
; (LAMBDA (CONDITION STREAM)
; (FORMAT STREAM
; "Argon2 parameters not supported. block-count must be at least 8, key-length must be at least 4, salt must be at least 8 bytes long and iteration-count must be at least 1.")))
; (:DOCUMENTATION
; "Signaled when invalid Argon2 parameters are provided to MAKE-KDF."))
; --> SB-KERNEL::%SET-CONDITION-REPORT SB-KERNEL::%SET-CONDITION-REPORT
; --> FUNCTION FUNCALL
; ==>
; 1
;
; caught STYLE-WARNING:
; The variable CONDITION is defined but never used.
; processing (DEFINE-CONDITION INSUFFICIENT-BUFFER-SPACE ...)
; processing (DEFINE-CONDITION INVALID-PADDING ...)
; processing (DEFINE-CONDITION INVALID-MAC-PARAMETER ...)
; processing (DEFINE-CONDITION INVALID-SIGNATURE-LENGTH ...)
; processing (DEFINE-CONDITION INVALID-MESSAGE-LENGTH ...)
; processing (DEFINE-CONDITION MISSING-KEY-PARAMETER ...)
; processing (DEFINE-CONDITION MISSING-MESSAGE-PARAMETER ...)
; processing (DEFINE-CONDITION MISSING-SIGNATURE-PARAMETER ...)
; processing (DEFINE-CONDITION INCOMPATIBLE-KEYS ...)
; processing (DEFINE-CONDITION INVALID-CURVE-POINT ...)
; processing (DEFINE-CONDITION INVALID-PUBLIC-KEY-LENGTH ...)
; processing (DEFINE-CONDITION OAEP-DECODING-ERROR ...)
; processing (DEFINE-CONDITION UNSUPPORTED-AUTHENTICATED-ENCRYPTION-MODE ...)
; processing (DEFINE-CONDITION BAD-AUTHENTICATION-TAG ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/conditions-tmpUIQ1NDZ1.fasl
; compilation finished in 0:00:00.336
WARNING:
Lisp compilation had style-warnings while
compiling #<CL-SOURCE-FILE "ironclad/core" "src" "conditions">
; compiling file "/usr/share/common-lisp/source/ironclad/src/generic.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :CRYPTO)
; processing (DEFGENERIC PROCESS-ASSOCIATED-DATA ...)
; processing (DEFGENERIC PRODUCE-TAG ...)
; processing (DEFGENERIC VERIFY-KEY ...)
; processing (DEFGENERIC SCHEDULE-KEY ...)
; processing (DEFGENERIC KEY-LENGTHS ...)
; processing (DEFGENERIC BLOCK-LENGTH ...)
; processing (DEFGENERIC ENCRYPTED-MESSAGE-LENGTH ...)
; processing (DEFGENERIC MODE-CRYPT-FUNCTIONS ...)
; processing (DEFGENERIC VALID-MODE-FOR-CIPHER-P ...)
; processing (DEFGENERIC ENCRYPT ...)
; processing (DEFGENERIC DECRYPT ...)
; processing (DEFGENERIC DIGEST-FILE ...)
; processing (DEFGENERIC DIGEST-STREAM ...)
; processing (DEFGENERIC DIGEST-SEQUENCE ...)
; processing (DEFGENERIC COPY-DIGEST ...)
; processing (DEFGENERIC UPDATE-DIGEST ...)
; processing (DEFGENERIC PRODUCE-DIGEST ...)
; processing (DEFGENERIC DIGEST-LENGTH ...)
; processing (DEFGENERIC DERIVE-KEY ...)
; processing (DEFGENERIC UPDATE-MAC ...)
; processing (DEFGENERIC PRODUCE-MAC ...)
; processing (DEFGENERIC ADD-PADDING-BYTES ...)
; processing (DEFGENERIC COUNT-PADDING-BYTES ...)
; processing (DEFGENERIC MAKE-PRNG ...)
; processing (DEFGENERIC PRNG-RANDOM-DATA ...)
; processing (DEFGENERIC PRNG-RESEED ...)
; processing (DEFGENERIC PRNG-SEED-LENGTH ...)
; processing (DEFGENERIC MAKE-PUBLIC-KEY ...)
; processing (DEFGENERIC DESTRUCTURE-PUBLIC-KEY ...)
; processing (DEFGENERIC MAKE-PRIVATE-KEY ...)
; processing (DEFGENERIC DESTRUCTURE-PRIVATE-KEY ...)
; processing (DEFGENERIC GENERATE-KEY-PAIR ...)
; processing (DEFGENERIC MAKE-SIGNATURE ...)
; processing (DEFGENERIC DESTRUCTURE-SIGNATURE ...)
; processing (DEFGENERIC GENERATE-SIGNATURE-NONCE ...)
; processing (DEFGENERIC SIGN-MESSAGE ...)
; processing (DEFGENERIC VERIFY-SIGNATURE ...)
; processing (DEFGENERIC MAKE-MESSAGE ...)
; processing (DEFGENERIC DESTRUCTURE-MESSAGE ...)
; processing (DEFGENERIC ENCRYPT-MESSAGE ...)
; processing (DEFGENERIC DECRYPT-MESSAGE ...)
; processing (DEFGENERIC DIFFIE-HELLMAN ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/generic-tmp7V5GAYEU.fasl
; compilation finished in 0:00:00.056
WARNING: redefining IRONCLAD:BLOCK-LENGTH in DEFGENERIC
; compiling file "/usr/share/common-lisp/source/ironclad/src/macro-utils.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :CRYPTO)
; processing (DEFUN QUOTATIONP ...)
; processing (DEFUN UNQUOTE ...)
; processing (DEFUN MASSAGE-SYMBOL ...)
; processing (DEFUN MAKE-CIRCULAR-LIST ...)
; processing (DEFUN CIRCULAR-LIST-SUBSEQ ...)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...)
; processing (DEFMACRO DOTIMES-UNROLLED ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/macro-utils-tmpB7TVS35O.fasl
; compilation finished in 0:00:00.100
; compiling file "/usr/share/common-lisp/source/ironclad/src/util.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :CRYPTO)
; processing (DECLAIM (INLINE BYTE-ARRAY-TO-HEX-STRING ...))
; processing (DEFUN BYTE-ARRAY-TO-HEX-STRING ...)
; file: /usr/share/common-lisp/source/ironclad/src/util.lisp
; in: DEFUN BYTE-ARRAY-TO-HEX-STRING
; (AREF VECTOR IRONCLAD::I)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; processing (DEFUN HEX-STRING-TO-BYTE-ARRAY ...)
; processing (DEFUN ASCII-STRING-TO-BYTE-ARRAY ...)
; file: /usr/share/common-lisp/source/ironclad/src/util.lisp
; in: DEFUN ASCII-STRING-TO-BYTE-ARRAY
; (CHAR STRING IRONCLAD::I)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; processing (DECLAIM (NOTINLINE BYTE-ARRAY-TO-HEX-STRING ...))
; processing (DEFUN CONSTANT-TIME-EQUAL ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/util-tmpJOMD2L5F.fasl
; compilation finished in 0:00:00.192
; compiling file "/usr/share/common-lisp/source/ironclad/src/opt/sbcl/fndb.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :SB-C)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/opt/sbcl/fndb-tmpDH22VGZN.fasl
; compilation finished in 0:00:00.008
; compiling file "/usr/share/common-lisp/source/ironclad/src/opt/sbcl/x86oid-vm.lisp" (written 12 SEP 2021 08:27:41 AM):
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/opt/sbcl/x86oid-vm-tmpXDMVI6M.fasl
; compilation finished in 0:00:00.020
; compiling file "/usr/share/common-lisp/source/ironclad/src/opt/sbcl/cpu-features.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :CRYPTO)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/opt/sbcl/cpu-features-tmpLT66CQGP.fasl
; compilation finished in 0:00:00.004
; compiling file "/usr/share/common-lisp/source/ironclad/src/common.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :CRYPTO)
; processing (DEFMACRO DEFCONST ...)
; processing (DEFTYPE INDEX ...)
; processing (DEFTYPE INDEX+1 ...)
; processing (DEFTYPE SIMPLE-OCTET-VECTOR ...)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...)
; processing (PROGN (PROGN # ...) ...)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...)
; processing (DECLAIM (INLINE UB16REF/LE ...))
; processing (DEFUN UB16REF/LE ...)
; processing (DEFUN (SETF UB16REF/LE) ...)
; processing (DEFUN UB16REF/BE ...)
; processing (DEFUN (SETF UB16REF/BE) ...)
; processing (DEFUN UB32REF/LE ...)
; processing (DEFUN (SETF UB32REF/LE) ...)
; processing (DEFUN UB32REF/BE ...)
; processing (DEFUN (SETF UB32REF/BE) ...)
; processing (DEFUN UB64REF/LE ...)
; processing (DEFUN (SETF UB64REF/LE) ...)
; processing (DEFUN UB64REF/BE ...)
; processing (DEFUN (SETF UB64REF/BE) ...)
; processing (DECLAIM (INLINE MOD32+) ...)
; processing (DEFUN MOD32+ ...)
; processing (DEFINE-COMPILER-MACRO MOD32+ ...)
; processing (DECLAIM (INLINE MOD32-) ...)
; processing (DEFUN MOD32- ...)
; processing (DEFINE-COMPILER-MACRO MOD32- ...)
; processing (DECLAIM (INLINE MOD32*) ...)
; processing (DEFUN MOD32* ...)
; processing (DEFINE-COMPILER-MACRO MOD32* ...)
; processing (DECLAIM (INLINE MOD32ASH) ...)
; processing (DEFUN MOD32ASH ...)
; processing (DEFINE-COMPILER-MACRO MOD32ASH ...)
; processing (DECLAIM (INLINE MOD32LOGNOT) ...)
; processing (DEFUN MOD32LOGNOT ...)
; processing (DEFINE-COMPILER-MACRO MOD32LOGNOT ...)
; processing (DECLAIM (INLINE ROL32 ...) ...)
; processing (DEFUN ROL32 ...)
; processing (DEFUN ROR32 ...)
; processing (DECLAIM (FTYPE # ...))
; processing (DEFUN MOD64+ ...)
; processing (DEFINE-COMPILER-MACRO MOD64+ ...)
; processing (DEFUN MOD64- ...)
; processing (DEFINE-COMPILER-MACRO MOD64- ...)
; processing (DEFUN MOD64* ...)
; processing (DEFINE-COMPILER-MACRO MOD64* ...)
; processing (DECLAIM (FTYPE # ...))
; processing (DEFUN MOD64ASH ...)
; processing (DEFINE-COMPILER-MACRO MOD64ASH ...)
; processing (DECLAIM (FTYPE # ...))
; processing (DEFUN MOD64LOGNOT ...)
; processing (DEFINE-COMPILER-MACRO MOD64LOGNOT ...)
; processing (DECLAIM (FTYPE # ...))
; processing (DEFUN ROL64 ...)
; processing (DEFUN ROR64 ...)
; processing (DECLAIM (INLINE %ADD-WITH-CARRY ...))
; processing (DEFUN %ADD-WITH-CARRY ...)
; processing (DEFUN %SUBTRACT-WITH-BORROW ...)
; processing (DECLAIM (INLINE FILL-BLOCK-LE-UB8 ...))
; processing (DECLAIM (INLINE COPY-TO-BUFFER))
; processing (DEFUN COPY-TO-BUFFER ...)
; processing (DEFUN FILL-BLOCK-UB8-LE ...)
; processing (DEFUN FILL-BLOCK-UB8-BE ...)
; processing (DEFUN FILL-BLOCK-UB8-LE/64 ...)
; file: /usr/share/common-lisp/source/ironclad/src/common.lisp
; in: DEFUN FILL-BLOCK-UB8-LE/64
; (IRONCLAD:UB64REF/LE IRONCLAD::BUFFER IRONCLAD::J)
; --> BLOCK DPB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
;
; note: doing unsigned word to integer coercion (cost 20)
;
; note: doing unsigned word to integer coercion (cost 20)
; processing (DEFUN FILL-BLOCK-UB8-BE/64 ...)
; file: /usr/share/common-lisp/source/ironclad/src/common.lisp
; in: DEFUN FILL-BLOCK-UB8-BE/64
; (IRONCLAD:UB64REF/BE IRONCLAD::BUFFER IRONCLAD::J)
; --> BLOCK DPB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
;
; note: doing unsigned word to integer coercion (cost 20)
;
; note: doing unsigned word to integer coercion (cost 20)
; processing (DEFUN XOR-BLOCK ...)
; processing (DEFINE-COMPILER-MACRO XOR-BLOCK ...)
; file: /usr/share/common-lisp/source/ironclad/src/common.lisp
; in: DEFINE-COMPILER-MACRO XOR-BLOCK
; (DEFINE-COMPILER-MACRO IRONCLAD::XOR-BLOCK
; (&WHOLE IRONCLAD::FORM &ENVIRONMENT IRONCLAD::ENV IRONCLAD:BLOCK-LENGTH
; IRONCLAD::INPUT-BLOCK1 IRONCLAD::INPUT-BLOCK1-START
; IRONCLAD::INPUT-BLOCK2 IRONCLAD::INPUT-BLOCK2-START
; IRONCLAD::OUTPUT-BLOCK IRONCLAD::OUTPUT-BLOCK-START)
; (COND (T IRONCLAD::FORM)))
; --> SB-INT:BINDING*
; ==>
; (LET* ((#:G0
; (SB-C::CHECK-DS-LIST (SB-C::COMPILER-MACRO-ARGS #:EXPR) 7 7
; '(# IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK1
; IRONCLAD::INPUT-BLOCK1-START
; IRONCLAD::INPUT-BLOCK2
; IRONCLAD::INPUT-BLOCK2-START
; IRONCLAD::OUTPUT-BLOCK
; IRONCLAD::OUTPUT-BLOCK-START)))
; (IRONCLAD:BLOCK-LENGTH (POP #:G0))
; (IRONCLAD::INPUT-BLOCK1 (POP #:G0))
; (IRONCLAD::INPUT-BLOCK1-START (POP #:G0))
; (IRONCLAD::INPUT-BLOCK2 (POP #:G0))
; (IRONCLAD::INPUT-BLOCK2-START (POP #:G0))
; (IRONCLAD::OUTPUT-BLOCK (POP #:G0))
; (IRONCLAD::OUTPUT-BLOCK-START (POP #:G0)))
; (DECLARE
; (SB-C::CONSTANT-VALUE IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK1
; IRONCLAD::INPUT-BLOCK1-START IRONCLAD::INPUT-BLOCK2
; IRONCLAD::INPUT-BLOCK2-START IRONCLAD::OUTPUT-BLOCK
; IRONCLAD::OUTPUT-BLOCK-START))
; (BLOCK IRONCLAD::XOR-BLOCK (COND (T IRONCLAD::FORM))))
;
; caught STYLE-WARNING:
; The variable BLOCK-LENGTH is defined but never used.
;
; caught STYLE-WARNING:
; The variable INPUT-BLOCK1 is defined but never used.
;
; caught STYLE-WARNING:
; The variable INPUT-BLOCK1-START is defined but never used.
;
; caught STYLE-WARNING:
; The variable INPUT-BLOCK2 is defined but never used.
;
; caught STYLE-WARNING:
; The variable INPUT-BLOCK2-START is defined but never used.
;
; caught STYLE-WARNING:
; The variable OUTPUT-BLOCK is defined but never used.
;
; caught STYLE-WARNING:
; The variable OUTPUT-BLOCK-START is defined but never used.
;
; caught STYLE-WARNING:
; The variable ENV is defined but never used.
; file: /usr/share/common-lisp/source/ironclad/src/common.lisp
; in: DEFINE-COMPILER-MACRO XOR-BLOCK
; (DEFINE-COMPILER-MACRO IRONCLAD::XOR-BLOCK
; (&WHOLE IRONCLAD::FORM &ENVIRONMENT IRONCLAD::ENV IRONCLAD:BLOCK-LENGTH
; IRONCLAD::INPUT-BLOCK1 IRONCLAD::INPUT-BLOCK1-START
; IRONCLAD::INPUT-BLOCK2 IRONCLAD::INPUT-BLOCK2-START
; IRONCLAD::OUTPUT-BLOCK IRONCLAD::OUTPUT-BLOCK-START)
; (COND (T IRONCLAD::FORM)))
; --> EVAL-WHEN SB-C::%DEFINE-COMPILER-MACRO SB-C::%DEFINE-COMPILER-MACRO
; --> SB-INT:NAMED-LAMBDA FUNCTION SB-INT:NAMED-DS-BIND SB-INT:BINDING*
; ==>
; (LET* ((#:G0
; (SB-C::CHECK-DS-LIST (SB-C::COMPILER-MACRO-ARGS #:EXPR) 7 7
; '(# IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK1
; IRONCLAD::INPUT-BLOCK1-START
; IRONCLAD::INPUT-BLOCK2
; IRONCLAD::INPUT-BLOCK2-START
; IRONCLAD::OUTPUT-BLOCK
; IRONCLAD::OUTPUT-BLOCK-START)))
; (IRONCLAD:BLOCK-LENGTH (POP #:G0))
; (IRONCLAD::INPUT-BLOCK1 (POP #:G0))
; (IRONCLAD::INPUT-BLOCK1-START (POP #:G0))
; (IRONCLAD::INPUT-BLOCK2 (POP #:G0))
; (IRONCLAD::INPUT-BLOCK2-START (POP #:G0))
; (IRONCLAD::OUTPUT-BLOCK (POP #:G0))
; (IRONCLAD::OUTPUT-BLOCK-START (POP #:G0)))
; (DECLARE
; (SB-C::CONSTANT-VALUE IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK1
; IRONCLAD::INPUT-BLOCK1-START IRONCLAD::INPUT-BLOCK2
; IRONCLAD::INPUT-BLOCK2-START IRONCLAD::OUTPUT-BLOCK
; IRONCLAD::OUTPUT-BLOCK-START))
; (BLOCK IRONCLAD::XOR-BLOCK (COND (T IRONCLAD::FORM))))
;
; caught STYLE-WARNING:
; The variable BLOCK-LENGTH is defined but never used.
;
; caught STYLE-WARNING:
; The variable INPUT-BLOCK1 is defined but never used.
;
; caught STYLE-WARNING:
; The variable INPUT-BLOCK1-START is defined but never used.
;
; caught STYLE-WARNING:
; The variable INPUT-BLOCK2 is defined but never used.
;
; caught STYLE-WARNING:
; The variable INPUT-BLOCK2-START is defined but never used.
;
; caught STYLE-WARNING:
; The variable OUTPUT-BLOCK is defined but never used.
;
; caught STYLE-WARNING:
; The variable OUTPUT-BLOCK-START is defined but never used.
; --> EVAL-WHEN SB-C::%DEFINE-COMPILER-MACRO SB-C::%DEFINE-COMPILER-MACRO
; --> SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA (COMPILER-MACRO IRONCLAD::XOR-BLOCK)
; (#:EXPR IRONCLAD::ENV &AUX (IRONCLAD::FORM #:EXPR))
; (DECLARE
; (SB-C::LAMBDA-LIST
; (IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK1
; IRONCLAD::INPUT-BLOCK1-START
; IRONCLAD::INPUT-BLOCK2
; IRONCLAD::INPUT-BLOCK2-START
; IRONCLAD::OUTPUT-BLOCK
; IRONCLAD::OUTPUT-BLOCK-START)))
; (SB-INT:NAMED-DS-BIND (:MACRO IRONCLAD::XOR-BLOCK . DEFINE-COMPILER-MACRO)
; (IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK1
; IRONCLAD::INPUT-BLOCK1-START
; IRONCLAD::INPUT-BLOCK2
; IRONCLAD::INPUT-BLOCK2-START
; IRONCLAD::OUTPUT-BLOCK
; IRONCLAD::OUTPUT-BLOCK-START)
; (SB-C::COMPILER-MACRO-ARGS #:EXPR)
; (DECLARE
; (SB-C::CONSTANT-VALUE IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK1
; IRONCLAD::INPUT-BLOCK1-START
; IRONCLAD::INPUT-BLOCK2
; IRONCLAD::INPUT-BLOCK2-START
; IRONCLAD::OUTPUT-BLOCK
; IRONCLAD::OUTPUT-BLOCK-START))
; (BLOCK IRONCLAD::XOR-BLOCK (COND (T IRONCLAD::FORM)))))
;
; caught STYLE-WARNING:
; The variable ENV is defined but never used.
; processing (DEFUN COPY-BLOCK ...)
; processing (DEFINE-COMPILER-MACRO COPY-BLOCK ...)
; file: /usr/share/common-lisp/source/ironclad/src/common.lisp
; in: DEFINE-COMPILER-MACRO COPY-BLOCK
; (DEFINE-COMPILER-MACRO IRONCLAD::COPY-BLOCK
; (&WHOLE IRONCLAD::FORM &ENVIRONMENT IRONCLAD::ENV IRONCLAD:BLOCK-LENGTH
; IRONCLAD::INPUT-BLOCK IRONCLAD::INPUT-BLOCK-START IRONCLAD::OUTPUT-BLOCK
; IRONCLAD::OUTPUT-BLOCK-START)
; (COND (T IRONCLAD::FORM)))
; --> SB-INT:BINDING*
; ==>
; (LET* ((#:G0
; (SB-C::CHECK-DS-LIST (SB-C::COMPILER-MACRO-ARGS #:EXPR) 5 5
; '(# IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK
; IRONCLAD::INPUT-BLOCK-START
; IRONCLAD::OUTPUT-BLOCK
; IRONCLAD::OUTPUT-BLOCK-START)))
; (IRONCLAD:BLOCK-LENGTH (POP #:G0))
; (IRONCLAD::INPUT-BLOCK (POP #:G0))
; (IRONCLAD::INPUT-BLOCK-START (POP #:G0))
; (IRONCLAD::OUTPUT-BLOCK (POP #:G0))
; (IRONCLAD::OUTPUT-BLOCK-START (POP #:G0)))
; (DECLARE
; (SB-C::CONSTANT-VALUE IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK
; IRONCLAD::INPUT-BLOCK-START IRONCLAD::OUTPUT-BLOCK
; IRONCLAD::OUTPUT-BLOCK-START))
; (BLOCK IRONCLAD::COPY-BLOCK (COND (T IRONCLAD::FORM))))
;
; caught STYLE-WARNING:
; The variable BLOCK-LENGTH is defined but never used.
;
; caught STYLE-WARNING:
; The variable INPUT-BLOCK is defined but never used.
;
; caught STYLE-WARNING:
; The variable INPUT-BLOCK-START is defined but never used.
;
; caught STYLE-WARNING:
; The variable OUTPUT-BLOCK is defined but never used.
;
; caught STYLE-WARNING:
; The variable OUTPUT-BLOCK-START is defined but never used.
;
; caught STYLE-WARNING:
; The variable ENV is defined but never used.
; file: /usr/share/common-lisp/source/ironclad/src/common.lisp
; in: DEFINE-COMPILER-MACRO COPY-BLOCK
; (DEFINE-COMPILER-MACRO IRONCLAD::COPY-BLOCK
; (&WHOLE IRONCLAD::FORM &ENVIRONMENT IRONCLAD::ENV IRONCLAD:BLOCK-LENGTH
; IRONCLAD::INPUT-BLOCK IRONCLAD::INPUT-BLOCK-START IRONCLAD::OUTPUT-BLOCK
; IRONCLAD::OUTPUT-BLOCK-START)
; (COND (T IRONCLAD::FORM)))
; --> EVAL-WHEN SB-C::%DEFINE-COMPILER-MACRO SB-C::%DEFINE-COMPILER-MACRO
; --> SB-INT:NAMED-LAMBDA FUNCTION SB-INT:NAMED-DS-BIND SB-INT:BINDING*
; ==>
; (LET* ((#:G0
; (SB-C::CHECK-DS-LIST (SB-C::COMPILER-MACRO-ARGS #:EXPR) 5 5
; '(# IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK
; IRONCLAD::INPUT-BLOCK-START
; IRONCLAD::OUTPUT-BLOCK
; IRONCLAD::OUTPUT-BLOCK-START)))
; (IRONCLAD:BLOCK-LENGTH (POP #:G0))
; (IRONCLAD::INPUT-BLOCK (POP #:G0))
; (IRONCLAD::INPUT-BLOCK-START (POP #:G0))
; (IRONCLAD::OUTPUT-BLOCK (POP #:G0))
; (IRONCLAD::OUTPUT-BLOCK-START (POP #:G0)))
; (DECLARE
; (SB-C::CONSTANT-VALUE IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK
; IRONCLAD::INPUT-BLOCK-START IRONCLAD::OUTPUT-BLOCK
; IRONCLAD::OUTPUT-BLOCK-START))
; (BLOCK IRONCLAD::COPY-BLOCK (COND (T IRONCLAD::FORM))))
;
; caught STYLE-WARNING:
; The variable BLOCK-LENGTH is defined but never used.
;
; caught STYLE-WARNING:
; The variable INPUT-BLOCK is defined but never used.
;
; caught STYLE-WARNING:
; The variable INPUT-BLOCK-START is defined but never used.
;
; caught STYLE-WARNING:
; The variable OUTPUT-BLOCK is defined but never used.
;
; caught STYLE-WARNING:
; The variable OUTPUT-BLOCK-START is defined but never used.
; --> EVAL-WHEN SB-C::%DEFINE-COMPILER-MACRO SB-C::%DEFINE-COMPILER-MACRO
; --> SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA (COMPILER-MACRO IRONCLAD::COPY-BLOCK)
; (#:EXPR IRONCLAD::ENV &AUX (IRONCLAD::FORM #:EXPR))
; (DECLARE
; (SB-C::LAMBDA-LIST
; (IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK
; IRONCLAD::INPUT-BLOCK-START
; IRONCLAD::OUTPUT-BLOCK
; IRONCLAD::OUTPUT-BLOCK-START)))
; (SB-INT:NAMED-DS-BIND (:MACRO IRONCLAD::COPY-BLOCK
; . DEFINE-COMPILER-MACRO)
; (IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK
; IRONCLAD::INPUT-BLOCK-START
; IRONCLAD::OUTPUT-BLOCK
; IRONCLAD::OUTPUT-BLOCK-START)
; (SB-C::COMPILER-MACRO-ARGS #:EXPR)
; (DECLARE
; (SB-C::CONSTANT-VALUE IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK
; IRONCLAD::INPUT-BLOCK-START
; IRONCLAD::OUTPUT-BLOCK
; IRONCLAD::OUTPUT-BLOCK-START))
; (BLOCK IRONCLAD::COPY-BLOCK (COND (T IRONCLAD::FORM)))))
;
; caught STYLE-WARNING:
; The variable ENV is defined but never used.
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/common-tmpWY32RQAP.fasl
; compilation finished in 0:00:00.884
WARNING:
Lisp compilation had style-warnings while
compiling #<CL-SOURCE-FILE "ironclad/core" "src" "common">
; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/cipher.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :CRYPTO)
; processing (DEFCLASS CIPHER ...)
; processing (DEFCLASS STREAM-CIPHER ...)
; processing (DEFMETHOD ENCRYPT ...)
; processing (DEFMETHOD DECRYPT ...)
; processing (DEFUN ENCRYPT-IN-PLACE ...)
; processing (DEFUN DECRYPT-IN-PLACE ...)
; processing (DEFMACRO WITH-WORDS ...)
; processing (DEFCLASS 8-BYTE-BLOCK-MIXIN ...)
; processing (DEFCLASS 16-BYTE-BLOCK-MIXIN ...)
; processing (DEFCLASS 32-BYTE-BLOCK-MIXIN ...)
; processing (DEFCLASS 64-BYTE-BLOCK-MIXIN ...)
; processing (DEFCLASS 128-BYTE-BLOCK-MIXIN ...)
; processing (DEFMACRO DEFCIPHER ...)
; processing (DEFMACRO DEFINE-BLOCK-ENCRYPTOR ...)
; processing (DEFMACRO DEFINE-BLOCK-DECRYPTOR ...)
; processing (DEFMACRO DEFINE-STREAM-CRYPTOR ...)
; processing (DEFMETHOD VERIFY-KEY ...)
; processing (DEFMETHOD SCHEDULE-KEY ...)
; processing (DEFCLASS CIPHER-INFO ...)
; processing (DEFMETHOD PRINT-OBJECT ...)
; processing (DEFUN %FIND-CIPHER ...)
; processing (DEFUN (SETF %FIND-CIPHER) ...)
; processing (DEFMETHOD KEY-LENGTHS ...)
; processing (DEFMETHOD KEY-LENGTHS ...)
; processing (DEFMETHOD BLOCK-LENGTH ...)
; processing (DEFMETHOD BLOCK-LENGTH ...)
; processing (DEFMETHOD BLOCK-LENGTH ...)
; processing (DEFMETHOD BLOCK-LENGTH ...)
; processing (DEFMETHOD BLOCK-LENGTH ...)
; processing (DEFMETHOD BLOCK-LENGTH ...)
; processing (DEFMETHOD BLOCK-LENGTH ...)
; processing (DEFUN LIST-ALL-CIPHERS ...)
; processing (DEFUN CIPHER-SUPPORTED-P ...)
; processing (DEFUN ACCEPTABLE-KEY-LENGTHS* ...)
; processing (DEFUN ACCEPTABLE-KEY-LENGTHS ...)
; processing (DEFUN GENERATE-KEY-VERIFIER-METHODS ...)
; processing (DEFUN GENERATE-COMMON-CIPHER-METHODS ...)
; processing (DEFUN GENERATE-BLOCK-CIPHER-FORMS ...)
; processing (DEFUN GENERATE-STREAM-CIPHER-FORMS ...)
; processing (DEFUN %DEFCIPHER ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/ciphers/cipher-tmpBNQ9QGOU.fasl
; compilation finished in 0:00:00.556
; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/padding.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :CRYPTO)
; processing (DEFCLASS PADDING ...)
; processing (DEFCLASS PKCS7-PADDING ...)
; processing (DEFMETHOD ADD-PADDING-BYTES ...)
; processing (DEFMETHOD COUNT-PADDING-BYTES ...)
; processing (DEFCLASS ANSI-X923-PADDING ...)
; processing (DEFMETHOD ADD-PADDING-BYTES ...)
; processing (DEFMETHOD COUNT-PADDING-BYTES ...)
; processing (DEFCLASS ISO-7816-4-PADDING ...)
; processing (DEFMETHOD ADD-PADDING-BYTES ...)
; processing (DEFMETHOD COUNT-PADDING-BYTES ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/ciphers/padding-tmpGWNCIGUH.fasl
; compilation finished in 0:00:00.192
; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/make-cipher.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :CRYPTO)
; processing (DEFMETHOD VALID-MODE-FOR-CIPHER-P ...)
; processing (DEFUN VALID-MODE-FOR-BLOCK-CIPHER-P ...)
; processing (DEFMETHOD VALID-MODE-FOR-CIPHER-P ...)
; processing (DEFMETHOD VALID-MODE-FOR-CIPHER-P ...)
; processing (DEFMETHOD VALID-MODE-FOR-CIPHER-P ...)
; processing (DEFMETHOD VALID-MODE-FOR-CIPHER-P ...)
; processing (DEFMETHOD VALID-MODE-FOR-CIPHER-P ...)
; processing (DEFMETHOD VALID-MODE-FOR-CIPHER-P ...)
; processing (DEFUN MAKE-MODE-FOR-CIPHER ...)
; processing (DEFMETHOD SHARED-INITIALIZE ...)
; processing (DEFMETHOD INITIALIZE-INSTANCE ...)
; processing (DEFUN %BLOCK-CIPHER-P ...)
; processing (DEFUN FIND-CIPHER-OR-LOSE ...)
; processing (DEFUN VALIDATE-PARAMETERS-FOR-CIPHER-INFO ...)
; processing (DEFUN MAKE-CIPHER ...)
; processing (DEFINE-COMPILER-MACRO MAKE-CIPHER ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/ciphers/make-cipher-tmpQFGWXALX.fasl
; compilation finished in 0:00:00.296
; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/modes.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :CRYPTO)
; processing (DEFCLASS ENCRYPTION-MODE ...)
; processing (DEFCLASS PADDED-MODE ...)
; processing (DEFCLASS ECB-MODE ...)
; processing (DEFCLASS STREAM-MODE ...)
; processing (DEFCLASS INITITIALIZATION-VECTOR-MIXIN ...)
; processing (DEFCLASS CBC-MODE ...)
; processing (DEFCLASS OFB-MODE ...)
; processing (DEFCLASS CFB-MODE ...)
; processing (DEFCLASS CFB8-MODE ...)
; processing (DEFCLASS CTR-MODE ...)
; processing (DEFMETHOD PRINT-OBJECT ...)
; processing (DEFMETHOD INITIALIZE-INSTANCE ...)
; processing (DEFVAR *SUPPORTED-MODES* ...)
; processing (DEFUN MODE-SUPPORTED-P ...)
; processing (DEFUN LIST-ALL-MODES ...)
; processing (DEFMETHOD ENCRYPT-MESSAGE ...)
; processing (DEFMETHOD DECRYPT-MESSAGE ...)
; processing (DEFUN INCREMENT-COUNTER-BLOCK ...)
; processing (DECLAIM (INLINE INCREMENT-COUNTER-BLOCK-1))
; processing (DEFUN INCREMENT-COUNTER-BLOCK-1 ...)
; processing (DEFUN DECREMENT-COUNTER-BLOCK ...)
; processing (MACROLET (# #) ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/modes.lisp
; in: DEFINE-MODE-FUNCTION MODE-CRYPT
; (IRONCLAD::DEFINE-MODE-FUNCTION IRONCLAD::MODE-CRYPT IRONCLAD::MESSAGE-LENGTH)
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET LET IF LET SETF SETQ THE
; ==>
; (- 128
; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0
; 128))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET MAKE-ARRAY
; ==>
; 1
;
; note: could not stack allocate: (DEFINE-MODE-FUNCTION MODE-CRYPT MESSAGE-LENGTH)
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET LET IF LET SETF SETQ THE
; ==>
; (- 128
; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0
; 128))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The second argument is a T, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET LET IF LET
; ==>
; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED 128)
; (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; ==>
; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING)
; (+ IRONCLAD::N-BYTES-PROCESSED 128))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET LET IF LET SETF SETQ THE
; ==>
; (- 64
; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0
; 64))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET MAKE-ARRAY
; ==>
; 1
;
; note: could not stack allocate: (DEFINE-MODE-FUNCTION MODE-CRYPT MESSAGE-LENGTH)
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET LET IF LET SETF SETQ THE
; ==>
; (- 64
; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0
; 64))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The second argument is a T, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET LET IF LET
; ==>
; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED 64)
; (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; ==>
; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING)
; (+ IRONCLAD::N-BYTES-PROCESSED 64))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET LET IF LET SETF SETQ THE
; ==>
; (- 32
; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0
; 32))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET MAKE-ARRAY
; ==>
; 1
;
; note: could not stack allocate: (DEFINE-MODE-FUNCTION MODE-CRYPT MESSAGE-LENGTH)
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET LET IF LET SETF SETQ THE
; ==>
; (- 32
; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0
; 32))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The second argument is a T, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET LET IF LET
; ==>
; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED 32)
; (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; ==>
; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING)
; (+ IRONCLAD::N-BYTES-PROCESSED 32))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET LET IF LET SETF SETQ THE
; ==>
; (- 16
; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0
; 16))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET MAKE-ARRAY
; ==>
; 1
;
; note: could not stack allocate: (DEFINE-MODE-FUNCTION MODE-CRYPT MESSAGE-LENGTH)
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET LET IF LET SETF SETQ THE
; ==>
; (- 16
; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0
; 16))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The second argument is a T, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET LET IF LET
; ==>
; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED 16)
; (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; ==>
; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING)
; (+ IRONCLAD::N-BYTES-PROCESSED 16))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET LET IF LET SETF SETQ THE
; ==>
; (- 8
; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0 8))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET MAKE-ARRAY
; ==>
; 1
;
; note: could not stack allocate: (DEFINE-MODE-FUNCTION MODE-CRYPT MESSAGE-LENGTH)
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET LET IF LET SETF SETQ THE
; ==>
; (- 8
; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0 8))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The second argument is a T, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET LET IF LET
; ==>
; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED 8)
; (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; ==>
; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING)
; (+ IRONCLAD::N-BYTES-PROCESSED 8))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET LET IF LET SETF SETQ THE
; ==>
; (- 128
; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0
; 128))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET MAKE-ARRAY
; ==>
; 1
;
; note: could not stack allocate: (DEFINE-MODE-FUNCTION MODE-CRYPT MESSAGE-LENGTH)
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET LET IF LET SETF SETQ THE
; ==>
; (- 128
; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0
; 128))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The second argument is a T, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER
; ==>
; (SB-PCL::LOAD-DEFMETHOD 'STANDARD-METHOD 'IRONCLAD::MODE-CRYPT-FUNCTIONS 'NIL
; (LIST (FIND-CLASS 'IRONCLAD::128-BYTE-BLOCK-MIXIN)
; (FIND-CLASS 'IRONCLAD::CBC-MODE))
; '(IRONCLAD::CIPHER IRONCLAD::MODE)
; (LIST* :FUNCTION
; (LET* ((SB-PCL::FMF #) (SB-PCL::MF #))
; (SETF # #)
; SB-PCL::MF)
; '(SB-PCL::PLIST (:ARG-INFO (2))
; SB-PCL::SIMPLE-NEXT-METHOD-CALL T))
; (SB-C:SOURCE-LOCATION))
;
; caught STYLE-WARNING:
; Call to IRONCLAD::COPY-BLOCK could not be inlined because its source code was
; not saved. A global INLINE or SB-EXT:MAYBE-INLINE proclamation must be in
; effect to save function definitions for inlining.
;
; caught STYLE-WARNING:
; Call to IRONCLAD::XOR-BLOCK could not be inlined because its source code was
; not saved. A global INLINE or SB-EXT:MAYBE-INLINE proclamation must be in
; effect to save function definitions for inlining.
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET LET IF LET
; ==>
; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED 128)
; (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; ==>
; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING)
; (+ IRONCLAD::N-BYTES-PROCESSED 128))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET LET IF LET SETF SETQ THE
; ==>
; (- 64
; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0
; 64))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET MAKE-ARRAY
; ==>
; 1
;
; note: could not stack allocate: (DEFINE-MODE-FUNCTION MODE-CRYPT MESSAGE-LENGTH)
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET LET IF LET SETF SETQ THE
; ==>
; (- 64
; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0
; 64))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The second argument is a T, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET LET IF LET
; ==>
; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED 64)
; (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; ==>
; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING)
; (+ IRONCLAD::N-BYTES-PROCESSED 64))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET LET IF LET SETF SETQ THE
; ==>
; (- 32
; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0
; 32))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET MAKE-ARRAY
; ==>
; 1
;
; note: could not stack allocate: (DEFINE-MODE-FUNCTION MODE-CRYPT MESSAGE-LENGTH)
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET LET IF LET SETF SETQ THE
; ==>
; (- 32
; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0
; 32))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The second argument is a T, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET LET IF LET
; ==>
; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED 32)
; (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; ==>
; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING)
; (+ IRONCLAD::N-BYTES-PROCESSED 32))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET LET IF LET SETF SETQ THE
; ==>
; (- 16
; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0
; 16))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET MAKE-ARRAY
; ==>
; 1
;
; note: could not stack allocate: (DEFINE-MODE-FUNCTION MODE-CRYPT MESSAGE-LENGTH)
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET LET IF LET SETF SETQ THE
; ==>
; (- 16
; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0
; 16))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The second argument is a T, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET LET IF LET
; ==>
; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED 16)
; (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; ==>
; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING)
; (+ IRONCLAD::N-BYTES-PROCESSED 16))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET LET IF LET SETF SETQ THE
; ==>
; (- 8
; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0 8))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET MAKE-ARRAY
; ==>
; 1
;
; note: could not stack allocate: (DEFINE-MODE-FUNCTION MODE-CRYPT MESSAGE-LENGTH)
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET LET IF LET SETF SETQ THE
; ==>
; (- 8
; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0 8))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The second argument is a T, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET LET IF LET
; ==>
; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED 8)
; (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; ==>
; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING)
; (+ IRONCLAD::N-BYTES-PROCESSED 8))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET VALUES IRONCLAD::MODE-LAMBDA LAMBDA
; --> FUNCTION LET MAKE-ARRAY
; ==>
; 1
;
; note: could not stack allocate: (DEFINE-MODE-FUNCTION MODE-CRYPT MESSAGE-LENGTH)
;
; note: could not stack allocate: (DEFINE-MODE-FUNCTION MODE-CRYPT MESSAGE-LENGTH)
;
; note: could not stack allocate: (DEFINE-MODE-FUNCTION MODE-CRYPT MESSAGE-LENGTH)
;
; note: could not stack allocate: (DEFINE-MODE-FUNCTION MODE-CRYPT MESSAGE-LENGTH)
;
; note: could not stack allocate: (DEFINE-MODE-FUNCTION MODE-CRYPT MESSAGE-LENGTH)
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET FLET IRONCLAD::CTR-CRYPT-FUNCTION BLOCK
; --> IRONCLAD::MODE-LAMBDA LAMBDA FUNCTION LET MULTIPLE-VALUE-BIND LET UNLESS
; --> IF AND IF LOCALLY AND THE >=
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET FLET IRONCLAD::CTR-CRYPT-FUNCTION BLOCK
; --> IRONCLAD::MODE-LAMBDA LAMBDA FUNCTION LET MULTIPLE-VALUE-BIND
; --> MULTIPLE-VALUE-CALL FUNCTION INCF SETQ THE
; ==>
; (+ IRONCLAD::Q IRONCLAD::KEYSTREAM-BLOCKS)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The second argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET FLET IRONCLAD::CTR-CRYPT-FUNCTION BLOCK
; --> IRONCLAD::MODE-LAMBDA LAMBDA FUNCTION LET LOOP BLOCK TAGBODY PROGN WHEN
; --> IF PROGN INCF SETQ THE
; ==>
; (+ 1 IRONCLAD::KEYSTREAM-BLOCKS)
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 1) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 1) . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET FLET IRONCLAD::CTR-CRYPT-FUNCTION BLOCK
; --> IRONCLAD::MODE-LAMBDA LAMBDA FUNCTION LET MULTIPLE-VALUE-BIND LET UNLESS
; --> IF AND IF LOCALLY AND THE >=
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET FLET IRONCLAD::CTR-CRYPT-FUNCTION BLOCK
; --> IRONCLAD::MODE-LAMBDA LAMBDA FUNCTION LET MULTIPLE-VALUE-BIND
; --> MULTIPLE-VALUE-CALL FUNCTION INCF SETQ THE
; ==>
; (+ IRONCLAD::Q IRONCLAD::KEYSTREAM-BLOCKS)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The second argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET FLET IRONCLAD::CTR-CRYPT-FUNCTION BLOCK
; --> IRONCLAD::MODE-LAMBDA LAMBDA FUNCTION LET LOOP BLOCK TAGBODY PROGN WHEN
; --> IF PROGN INCF SETQ THE
; ==>
; (+ 1 IRONCLAD::KEYSTREAM-BLOCKS)
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 1) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 1) . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET FLET IRONCLAD::CTR-CRYPT-FUNCTION BLOCK
; --> IRONCLAD::MODE-LAMBDA LAMBDA FUNCTION LET MULTIPLE-VALUE-BIND LET UNLESS
; --> IF AND IF LOCALLY AND THE >=
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET FLET IRONCLAD::CTR-CRYPT-FUNCTION BLOCK
; --> IRONCLAD::MODE-LAMBDA LAMBDA FUNCTION LET MULTIPLE-VALUE-BIND
; --> MULTIPLE-VALUE-CALL FUNCTION INCF SETQ THE
; ==>
; (+ IRONCLAD::Q IRONCLAD::KEYSTREAM-BLOCKS)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The second argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET FLET IRONCLAD::CTR-CRYPT-FUNCTION BLOCK
; --> IRONCLAD::MODE-LAMBDA LAMBDA FUNCTION LET LOOP BLOCK TAGBODY PROGN WHEN
; --> IF PROGN INCF SETQ THE
; ==>
; (+ 1 IRONCLAD::KEYSTREAM-BLOCKS)
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 1) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 1) . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET FLET IRONCLAD::CTR-CRYPT-FUNCTION BLOCK
; --> IRONCLAD::MODE-LAMBDA LAMBDA FUNCTION LET MULTIPLE-VALUE-BIND LET UNLESS
; --> IF AND IF LOCALLY AND THE >=
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET FLET IRONCLAD::CTR-CRYPT-FUNCTION BLOCK
; --> IRONCLAD::MODE-LAMBDA LAMBDA FUNCTION LET MULTIPLE-VALUE-BIND
; --> MULTIPLE-VALUE-CALL FUNCTION INCF SETQ THE
; ==>
; (+ IRONCLAD::Q IRONCLAD::KEYSTREAM-BLOCKS)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The second argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET FLET IRONCLAD::CTR-CRYPT-FUNCTION BLOCK
; --> IRONCLAD::MODE-LAMBDA LAMBDA FUNCTION LET LOOP BLOCK TAGBODY PROGN WHEN
; --> IF PROGN INCF SETQ THE
; ==>
; (+ 1 IRONCLAD::KEYSTREAM-BLOCKS)
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 1) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 1) . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET FLET IRONCLAD::CTR-CRYPT-FUNCTION BLOCK
; --> IRONCLAD::MODE-LAMBDA LAMBDA FUNCTION LET MULTIPLE-VALUE-BIND LET UNLESS
; --> IF AND IF LOCALLY AND THE >=
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET FLET IRONCLAD::CTR-CRYPT-FUNCTION BLOCK
; --> IRONCLAD::MODE-LAMBDA LAMBDA FUNCTION LET MULTIPLE-VALUE-BIND
; --> MULTIPLE-VALUE-CALL FUNCTION INCF SETQ THE
; ==>
; (+ IRONCLAD::Q IRONCLAD::KEYSTREAM-BLOCKS)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The second argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK LET FLET IRONCLAD::CTR-CRYPT-FUNCTION BLOCK
; --> IRONCLAD::MODE-LAMBDA LAMBDA FUNCTION LET LOOP BLOCK TAGBODY PROGN WHEN
; --> IF PROGN INCF SETQ THE
; ==>
; (+ 1 IRONCLAD::KEYSTREAM-BLOCKS)
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 1) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 1) . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; processing (DEFMETHOD ENCRYPTED-MESSAGE-LENGTH ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/ciphers/modes-tmpCXOPF0UO.fasl
; compilation finished in 0:00:03.952
WARNING:
Lisp compilation had style-warnings while
compiling #<CL-SOURCE-FILE "ironclad/core" "src" "ciphers" "modes">
; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/digest.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :CRYPTO)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL) ...)
; processing (DEFTYPE BUFFER-INDEX ...)
; processing (DEFUN UPDATE-DIGEST-FROM-STREAM ...)
; file: /usr/share/common-lisp/source/ironclad/src/digests/digest.lisp
; in: DEFUN UPDATE-DIGEST-FROM-STREAM
; (MAKE-ARRAY IRONCLAD::+BUFFER-SIZE+ :ELEMENT-TYPE '(UNSIGNED-BYTE 8))
;
; note: could not stack allocate:
; (MAKE-ARRAY +BUFFER-SIZE+ :ELEMENT-TYPE '(UNSIGNED-BYTE 8))
; processing (DECLAIM (INLINE STORE-DATA-LENGTH))
; processing (DEFUN STORE-DATA-LENGTH ...)
; processing (DEFMACRO DEFINE-DIGEST-REGISTERS ...)
; processing (DEFMACRO DEFINE-DIGEST-UPDATER ...)
; processing (DEFMACRO DEFINE-DIGEST-FINALIZER ...)
; processing (DEFSTRUCT (MDX # ...) ...)
; processing (DECLAIM (INLINE MDX-UPDATER))
; processing (DEFUN MDX-UPDATER ...)
; processing (DECLAIM (NOTINLINE MDX-UPDATER))
; processing (DEFMETHOD DIGEST-FILE ...)
; processing (DEFMETHOD DIGEST-FILE ...)
; processing (DEFMETHOD DIGEST-FILE ...)
; processing (DEFMETHOD DIGEST-STREAM ...)
; processing (DEFMETHOD DIGEST-STREAM ...)
; processing (DEFMETHOD DIGEST-STREAM ...)
; processing (DEFMETHOD DIGEST-SEQUENCE ...)
; processing (DEFMETHOD DIGEST-SEQUENCE ...)
; processing (DEFUN MAKE-DIGEST ...)
; processing (DEFUN DIGESTP ...)
; processing (DEFUN LIST-ALL-DIGESTS ...)
; processing (DEFUN DIGEST-SUPPORTED-P ...)
; processing (DEFMETHOD DIGEST-LENGTH ...)
; processing (DEFMETHOD DIGEST-LENGTH ...)
; processing (DEFMETHOD UPDATE-DIGEST ...)
; processing (DEFUN OPTIMIZED-MAKER-NAME ...)
; processing (DEFMACRO DEFDIGEST ...)
; processing (DEFINE-COMPILER-MACRO MAKE-DIGEST ...)
; file: /usr/share/common-lisp/source/ironclad/src/digests/digest.lisp
; in: DEFINE-COMPILER-MACRO MAKE-DIGEST
; (DEFINE-COMPILER-MACRO IRONCLAD:MAKE-DIGEST
; (&WHOLE IRONCLAD::FORM &ENVIRONMENT IRONCLAD::ENV IRONCLAD::NAME &REST
; IRONCLAD::KEYS &KEY &ALLOW-OTHER-KEYS)
; (DECLARE (IGNORE IRONCLAD::ENV))
; (COND
; ((OR (KEYWORDP IRONCLAD::NAME) (AND # #))
; (LET (#)
; (IF #
; `#
; IRONCLAD::FORM)))
; (T IRONCLAD::FORM)))
; --> EVAL-WHEN
; ==>
; (SB-C::%DEFINE-COMPILER-MACRO 'IRONCLAD:MAKE-DIGEST
; (SB-INT:NAMED-LAMBDA (COMPILER-MACRO
; IRONCLAD:MAKE-DIGEST)
; (#:EXPR IRONCLAD::ENV &AUX
; (IRONCLAD::FORM #:EXPR))
; (DECLARE
; (SB-C::LAMBDA-LIST
; (IRONCLAD::NAME &REST IRONCLAD::KEYS &KEY
; &ALLOW-OTHER-KEYS)))
; (DECLARE (IGNORE IRONCLAD::ENV))
; (SB-INT:NAMED-DS-BIND (:MACRO
; IRONCLAD:MAKE-DIGEST
; . DEFINE-COMPILER-MACRO)
; (IRONCLAD::NAME &REST IRONCLAD::KEYS &KEY
; &ALLOW-OTHER-KEYS)
; (SB-C::COMPILER-MACRO-ARGS #:EXPR)
; (DECLARE
; (SB-C::CONSTANT-VALUE IRONCLAD::NAME
; IRONCLAD::KEYS))
; (BLOCK IRONCLAD:MAKE-DIGEST (COND # #)))))
;
; caught STYLE-WARNING:
; 3 calls to IRONCLAD:MAKE-DIGEST were compiled before a compiler-macro was
; defined for it. A declaration of NOTINLINE at the call sites will eliminate
; this warning, as will defining the compiler-macro before its first potential
; use.
; processing (DEFUN MAYBE-EXPAND-ONE-SHOT-CALL ...)
; processing (DEFINE-COMPILER-MACRO DIGEST-SEQUENCE ...)
; processing (DEFINE-COMPILER-MACRO DIGEST-STREAM ...)
; processing (DEFINE-COMPILER-MACRO DIGEST-FILE ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/digests/digest-tmpAXIB1X7H.fasl
; compilation finished in 0:00:00.780
WARNING:
Lisp compilation had style-warnings while
compiling #<CL-SOURCE-FILE "ironclad/core" "src" "digests" "digest">
; compiling file "/usr/share/common-lisp/source/ironclad/src/macs/mac.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :CRYPTO)
; processing (DEFCLASS MAC ...)
; processing (DEFUN MACP ...)
; processing (DEFUN LIST-ALL-MACS ...)
; processing (DEFUN MAC-SUPPORTED-P ...)
; processing (DEFMACRO DEFMAC ...)
; processing (DEFUN MAKE-MAC ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/macs/mac-tmpCOGKFIGR.fasl
; compilation finished in 0:00:00.076
; compiling file "/usr/share/common-lisp/source/ironclad/src/prng/prng.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :CRYPTO)
; processing (DEFVAR *PRNG* ...)
; processing (DEFUN LIST-ALL-PRNGS ...)
; processing (DEFMETHOD MAKE-PRNG ...)
; processing (DEFUN RANDOM-DATA ...)
; processing (DEFUN READ-OS-RANDOM-SEED ...)
; processing (DEFUN RANDOM-BITS ...)
; processing (DEFUN STRONG-RANDOM ...)
; processing (DEFUN OS-RANDOM-SEED ...)
; processing (DEFUN READ-SEED ...)
; processing (DEFUN WRITE-SEED ...)
; processing (DEFUN FEED-FIFO ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/prng/prng-tmp9KWK6ETS.fasl
; compilation finished in 0:00:00.204
; compiling file "/usr/share/common-lisp/source/ironclad/src/prng/os-prng.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :CRYPTO)
; processing (DEFPARAMETER *OS-PRNG-STREAM* ...)
; processing (DEFPARAMETER *OS-PRNG-STREAM-LOCK* ...)
; processing (DEFCLASS OS-PRNG ...)
; processing (DEFMETHOD PRNG-RANDOM-DATA ...)
; file: /usr/share/common-lisp/source/ironclad/src/prng/os-prng.lisp
; in: DEFMETHOD PRNG-RANDOM-DATA (T OS-PRNG)
; (BORDEAUX-THREADS:WITH-LOCK-HELD (IRONCLAD::*OS-PRNG-STREAM-LOCK*)
; (UNLESS
; (AND IRONCLAD::*OS-PRNG-STREAM*
; (OPEN-STREAM-P IRONCLAD::*OS-PRNG-STREAM*))
; (SETF IRONCLAD::*OS-PRNG-STREAM*
; (OPEN #P"/dev/urandom" :ELEMENT-TYPE '#)))
; (READ-SEQUENCE IRONCLAD::SEQ IRONCLAD::*OS-PRNG-STREAM*))
; --> IF
; ==>
; NIL
;
; caught STYLE-WARNING:
; This is not a REAL:
; NIL
; See also:
; The SBCL Manual, Node "Handling of Types"
; processing (DEFMETHOD MAKE-PRNG ...)
; processing (SETF *PRNG* ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/prng/os-prng-tmpCRZB5VKB.fasl
; compilation finished in 0:00:00.052
WARNING:
Lisp compilation had style-warnings while
compiling #<CL-SOURCE-FILE "ironclad/core" "src" "prng" "os-prng">
; compiling file "/usr/share/common-lisp/source/ironclad/src/math.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :CRYPTO)
; processing (DEFUN EGCD ...)
; file: /usr/share/common-lisp/source/ironclad/src/math.lisp
; in: DEFUN EGCD
; (= IRONCLAD::C 0)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
; (FLOOR IRONCLAD::D IRONCLAD::C)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a (OR FLOAT INTEGER).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (* IRONCLAD::Q IRONCLAD::C)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a REAL, not a FLOAT.
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The second argument is a REAL, not a INTEGER.
; (- IRONCLAD::D (* IRONCLAD::Q IRONCLAD::C))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
; (* IRONCLAD::Q IRONCLAD::U_C)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The second argument is a NUMBER, not a INTEGER.
; (- IRONCLAD::U_D (* IRONCLAD::Q IRONCLAD::U_C))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; (* IRONCLAD::Q IRONCLAD::V_C)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The second argument is a NUMBER, not a INTEGER.
; (- IRONCLAD::V_D (* IRONCLAD::Q IRONCLAD::V_C))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; (>= IRONCLAD::A 0)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
; (>= IRONCLAD::B 0)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
; (FLOOR IRONCLAD::D IRONCLAD::C)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; (* IRONCLAD::Q IRONCLAD::C)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (SIGNED-BYTE 32).
; The second argument is a REAL, not a (SIGNED-BYTE 32).
; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 32) &REST
; T).
; etc.
; (- IRONCLAD::D (* IRONCLAD::Q IRONCLAD::C))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT &REST T).
; etc.
; (* IRONCLAD::Q IRONCLAD::U_C)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (SIGNED-BYTE 32).
; The second argument is a NUMBER, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER . #1#), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
; (- IRONCLAD::U_D (* IRONCLAD::Q IRONCLAD::U_C))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The second argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER . #1#), not a (VALUES SINGLE-FLOAT &REST T).
; etc.
; (* IRONCLAD::Q IRONCLAD::V_C)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (SIGNED-BYTE 32).
; The second argument is a NUMBER, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER . #1#), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
; (- IRONCLAD::V_D (* IRONCLAD::Q IRONCLAD::V_C))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The second argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER . #1#), not a (VALUES SINGLE-FLOAT &REST T).
; etc.
; processing (DEFUN JACOBI ...)
; file: /usr/share/common-lisp/source/ironclad/src/math.lisp
; in: DEFUN JACOBI
; (EVENP IRONCLAD::A)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (EVENP IRONCLAD::B)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (OR (INTEGER * -1) (INTEGER 1)), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (OR (INTEGER * -1) (INTEGER 1)), not a (UNSIGNED-BYTE
; 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (LOGAND IRONCLAD::A 7)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (MINUSP IRONCLAD::B)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
; (- IRONCLAD::B)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER * -1), not a FIXNUM.
; The result is a (VALUES (INTEGER 1) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 2) because:
; The first argument is a (INTEGER * -1), not a (SIGNED-BYTE 32).
; The result is a (VALUES (INTEGER 1) . #1#), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; (MINUSP IRONCLAD::A)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
; (EVENP IRONCLAD::A)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (LOGAND IRONCLAD::B 7)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (LOGAND IRONCLAD::A IRONCLAD::B 2)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (ABS IRONCLAD::A)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER * -1), not a FIXNUM.
; The result is a (VALUES (INTEGER 1) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 2) because:
; The first argument is a (INTEGER * -1), not a (SIGNED-BYTE 32).
; The result is a (VALUES (INTEGER 1) . #1#), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; (ASH IRONCLAD::A -1)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do #1# (cost 3) because:
; The first argument is a INTEGER, not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #2#), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
; (> IRONCLAD::B 1)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
; (ASH IRONCLAD::B -1)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do #1# (cost 3) because:
; The first argument is a INTEGER, not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #2#), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
; (ABS IRONCLAD::A)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER * -1), not a FIXNUM.
; The result is a (VALUES (INTEGER 1) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 2) because:
; The first argument is a (INTEGER * -1), not a (SIGNED-BYTE 32).
; The result is a (VALUES (INTEGER 1) . #1#), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; processing (DEFUN POWER-MOD-TAB ...)
; file: /usr/share/common-lisp/source/ironclad/src/math.lisp
; in: DEFUN POWER-MOD-TAB
; (1- IRONCLAD::K)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; (* IRONCLAD::B IRONCLAD::B)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
; The second argument is a NUMBER, not a INTEGER.
; (MOD (* IRONCLAD::B IRONCLAD::B) IRONCLAD::M)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a (OR FLOAT INTEGER).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (* IRONCLAD::BI IRONCLAD::BB)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
; The second argument is a REAL, not a INTEGER.
; (MOD (* IRONCLAD::BI IRONCLAD::BB) IRONCLAD::M)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a (OR FLOAT INTEGER).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (1- IRONCLAD::K)
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES INTEGER . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; (ASH 1 (1- IRONCLAD::K))
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 2) because:
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 29).
; The result is a (VALUES UNSIGNED-BYTE . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do #1# (cost 3) because:
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 29).
; The result is a (VALUES UNSIGNED-BYTE . #2#), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
; (* IRONCLAD::B IRONCLAD::B)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The second argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a NUMBER, not a (SIGNED-BYTE 32).
; The second argument is a NUMBER, not a (SIGNED-BYTE 32).
; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 32) &REST
; T).
; etc.
; (MOD (* IRONCLAD::B IRONCLAD::B) IRONCLAD::M)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT &REST T).
; etc.
; (* IRONCLAD::BI IRONCLAD::BB)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a NUMBER, not a (SIGNED-BYTE 32).
; The second argument is a REAL, not a (SIGNED-BYTE 32).
; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 32) &REST
; T).
; etc.
; (MOD (* IRONCLAD::BI IRONCLAD::BB) IRONCLAD::M)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT &REST T).
; etc.
; processing (DEFUN POWER-MOD ...)
; file: /usr/share/common-lisp/source/ironclad/src/math.lisp
; in: DEFUN POWER-MOD
; (ZEROP IRONCLAD::E)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
; (MOD 1 IRONCLAD::M)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL 0)), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL 0)), not a RATIONAL.
; The second argument is a (OR (DOUBLE-FLOAT * (0.0d0)) (SINGLE-FLOAT * (0.0))
; (RATIONAL * (0))), not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL 0)), not a FLOAT.
; The second argument is a (OR (DOUBLE-FLOAT * (0.0d0)) (SINGLE-FLOAT * (0.0))
; (RATIONAL * (0))), not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL 0)), not a SINGLE-FLOAT.
; The second argument is a (OR (DOUBLE-FLOAT * (0.0d0)) (SINGLE-FLOAT * (0.0))
; (RATIONAL * (0))), not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL 0)), not a DOUBLE-FLOAT.
; The second argument is a (OR (DOUBLE-FLOAT * (0.0d0)) (SINGLE-FLOAT * (0.0))
; (RATIONAL * (0))), not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (* IRONCLAD::RES IRONCLAD::B)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; The second argument is a NUMBER, not a INTEGER.
; (MOD (* IRONCLAD::RES IRONCLAD::B) IRONCLAD::M)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a (OR FLOAT INTEGER).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (* IRONCLAD::B IRONCLAD::B)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
; The second argument is a NUMBER, not a INTEGER.
; (MOD (* IRONCLAD::B IRONCLAD::B) IRONCLAD::M)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a (OR FLOAT INTEGER).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (LDB (BYTE IRONCLAD::TMP IRONCLAD::S) IRONCLAD::E)
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (* IRONCLAD::RES (SVREF IRONCLAD::TAB (ASH IRONCLAD::U -1)))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; The second argument is a NUMBER, not a INTEGER.
; (MOD (* IRONCLAD::RES (SVREF IRONCLAD::TAB (ASH IRONCLAD::U -1))) IRONCLAD::M)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a (OR FLOAT INTEGER).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (* IRONCLAD::RES IRONCLAD::RES)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; The second argument is a REAL, not a INTEGER.
; (MOD (* IRONCLAD::RES IRONCLAD::RES) IRONCLAD::M)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0)
; (SINGLE-FLOAT 0.0)), not a SINGLE-FLOAT.
; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0)
; (SINGLE-FLOAT 0.0)), not a DOUBLE-FLOAT.
; The second argument is a REAL, not a (OR FLOAT INTEGER).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL 0)), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL 0)), not a RATIONAL.
; The second argument is a (OR (DOUBLE-FLOAT * (0.0d0)) (SINGLE-FLOAT * (0.0))
; (RATIONAL * (0))), not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL 0)), not a FLOAT.
; The second argument is a (OR (DOUBLE-FLOAT * (0.0d0)) (SINGLE-FLOAT * (0.0))
; (RATIONAL * (0))), not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL 0)), not a SINGLE-FLOAT.
; The second argument is a (OR (DOUBLE-FLOAT * (0.0d0)) (SINGLE-FLOAT * (0.0))
; (RATIONAL * (0))), not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL 0)), not a DOUBLE-FLOAT.
; The second argument is a (OR (DOUBLE-FLOAT * (0.0d0)) (SINGLE-FLOAT * (0.0))
; (RATIONAL * (0))), not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0)
; (SINGLE-FLOAT 0.0)), not a FLOAT.
; (* IRONCLAD::RES IRONCLAD::RES)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; The second argument is a REAL, not a INTEGER.
; (MOD (* IRONCLAD::RES IRONCLAD::RES) IRONCLAD::M)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0)
; (SINGLE-FLOAT 0.0)), not a SINGLE-FLOAT.
; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0)
; (SINGLE-FLOAT 0.0)), not a DOUBLE-FLOAT.
; The second argument is a REAL, not a (OR FLOAT INTEGER).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL 0)), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL 0)), not a RATIONAL.
; The second argument is a (OR (DOUBLE-FLOAT * (0.0d0)) (SINGLE-FLOAT * (0.0))
; (RATIONAL * (0))), not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL 0)), not a FLOAT.
; The second argument is a (OR (DOUBLE-FLOAT * (0.0d0)) (SINGLE-FLOAT * (0.0))
; (RATIONAL * (0))), not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL 0)), not a SINGLE-FLOAT.
; The second argument is a (OR (DOUBLE-FLOAT * (0.0d0)) (SINGLE-FLOAT * (0.0))
; (RATIONAL * (0))), not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL 0)), not a DOUBLE-FLOAT.
; The second argument is a (OR (DOUBLE-FLOAT * (0.0d0)) (SINGLE-FLOAT * (0.0))
; (RATIONAL * (0))), not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0)
; (SINGLE-FLOAT 0.0)), not a FLOAT.
; (MOD 1 IRONCLAD::M)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR FLOAT (RATIONAL 0)), not a FIXNUM.
; The second argument is a (OR (DOUBLE-FLOAT * #1=(0.0d0))
; (SINGLE-FLOAT * #2=(0.0))
; (RATIONAL * #3=(0))), not a FIXNUM.
; The result is a (VALUES REAL . #4=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a (OR FLOAT (RATIONAL 0)), not a SINGLE-FLOAT.
; The second argument is a (OR (DOUBLE-FLOAT * #1#) (SINGLE-FLOAT * #2#)
; (RATIONAL * #3#)), not a SINGLE-FLOAT.
; The result is a (VALUES REAL . #4#), not a (VALUES SINGLE-FLOAT &REST T).
; etc.
; (< IRONCLAD::I 0)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a (INTEGER -1), not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a (INTEGER -1), not a FIXNUM.
; etc.
; (- IRONCLAD::I IRONCLAD::K)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER -7) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (INTEGER -7) . #1#), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (1+ (- IRONCLAD::I IRONCLAD::K))
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER -7), not a FIXNUM.
; The result is a (VALUES (INTEGER -6) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (INTEGER -7), not a FIXNUM.
; The result is a (VALUES (INTEGER -6) . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; (MAX (1+ (- IRONCLAD::I IRONCLAD::K)) 0)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a (INTEGER -6), not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a (INTEGER -6), not a FIXNUM.
; etc.
; (- IRONCLAD::I IRONCLAD::S)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The second argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The second argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (1+ (- IRONCLAD::I IRONCLAD::S))
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; (DOTIMES (IRONCLAD::H IRONCLAD::TMP)
; (SETQ IRONCLAD::RES (MOD (* IRONCLAD::RES IRONCLAD::RES) IRONCLAD::M)))
; --> BLOCK LET TAGBODY UNLESS IF >=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (* IRONCLAD::RES IRONCLAD::RES)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; The result is a (VALUES
; (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0)
; (SINGLE-FLOAT 0.0))
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a REAL, not a (SIGNED-BYTE 32).
; The second argument is a REAL, not a (SIGNED-BYTE 32).
; The result is a (VALUES
; (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0)
; (SINGLE-FLOAT 0.0))
; . #1#), not a (VALUES (SIGNED-BYTE 32) &REST T).
; etc.
; (MOD (* IRONCLAD::RES IRONCLAD::RES) IRONCLAD::M)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0)
; (SINGLE-FLOAT 0.0)), not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0)
; (SINGLE-FLOAT 0.0)), not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR FLOAT (RATIONAL 0)), not a FIXNUM.
; The second argument is a (OR (DOUBLE-FLOAT * #1=(0.0d0))
; (SINGLE-FLOAT * #2=(0.0))
; (RATIONAL * #3=(0))), not a FIXNUM.
; The result is a (VALUES REAL . #4=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a (OR FLOAT (RATIONAL 0)), not a SINGLE-FLOAT.
; The second argument is a (OR (DOUBLE-FLOAT * #1#) (SINGLE-FLOAT * #2#)
; (RATIONAL * #3#)), not a SINGLE-FLOAT.
; The result is a (VALUES REAL . #4#), not a (VALUES SINGLE-FLOAT &REST T).
; etc.
; (DOTIMES (IRONCLAD::H IRONCLAD::TMP)
; (SETQ IRONCLAD::RES (MOD (* IRONCLAD::RES IRONCLAD::RES) IRONCLAD::M)))
; --> BLOCK LET TAGBODY PSETQ PROGN SETQ THE 1+
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 1) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 1) . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; (ASH IRONCLAD::U -1)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (INTEGER 1), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (INTEGER 1), not a (SIGNED-BYTE 32).
; etc.
; (* IRONCLAD::RES (SVREF IRONCLAD::TAB (ASH IRONCLAD::U -1)))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a REAL, not a (SIGNED-BYTE 32).
; The second argument is a NUMBER, not a (SIGNED-BYTE 32).
; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 32) &REST
; T).
; etc.
; (MOD (* IRONCLAD::RES (SVREF IRONCLAD::TAB (ASH IRONCLAD::U -1))) IRONCLAD::M)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT &REST T).
; etc.
; (INCF IRONCLAD::S)
; --> THE
; ==>
; (+ 1 IRONCLAD::S)
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 1) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 1) . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; (* IRONCLAD::RES IRONCLAD::RES)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; The result is a (VALUES
; (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0)
; (SINGLE-FLOAT 0.0))
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a REAL, not a (SIGNED-BYTE 32).
; The second argument is a REAL, not a (SIGNED-BYTE 32).
; The result is a (VALUES
; (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0)
; (SINGLE-FLOAT 0.0))
; . #1#), not a (VALUES (SIGNED-BYTE 32) &REST T).
; etc.
; (MOD (* IRONCLAD::RES IRONCLAD::RES) IRONCLAD::M)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0)
; (SINGLE-FLOAT 0.0)), not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0)
; (SINGLE-FLOAT 0.0)), not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR FLOAT (RATIONAL 0)), not a FIXNUM.
; The second argument is a (OR (DOUBLE-FLOAT * #1=(0.0d0))
; (SINGLE-FLOAT * #2=(0.0))
; (RATIONAL * #3=(0))), not a FIXNUM.
; The result is a (VALUES REAL . #4=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a (OR FLOAT (RATIONAL 0)), not a SINGLE-FLOAT.
; The second argument is a (OR (DOUBLE-FLOAT * #1#) (SINGLE-FLOAT * #2#)
; (RATIONAL * #3#)), not a SINGLE-FLOAT.
; The result is a (VALUES REAL . #4#), not a (VALUES SINGLE-FLOAT &REST T).
; etc.
; (DECF IRONCLAD::I)
; --> THE SB-IMPL::XSUBTRACT BLOCK
; ==>
; (- SB-IMPL::B SB-IMPL::A)
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER -1) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER -1) . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; (* IRONCLAD::RES IRONCLAD::B)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a REAL, not a (SIGNED-BYTE 32).
; The second argument is a NUMBER, not a (SIGNED-BYTE 32).
; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 32) &REST
; T).
; etc.
; (MOD (* IRONCLAD::RES IRONCLAD::B) IRONCLAD::M)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT &REST T).
; etc.
; (ASH IRONCLAD::E -1)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do #1# (cost 3) because:
; The first argument is a INTEGER, not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #2#), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
; (* IRONCLAD::B IRONCLAD::B)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The second argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a NUMBER, not a (SIGNED-BYTE 32).
; The second argument is a NUMBER, not a (SIGNED-BYTE 32).
; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 32) &REST
; T).
; etc.
; (MOD (* IRONCLAD::B IRONCLAD::B) IRONCLAD::M)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT &REST T).
; etc.
; processing (DEFUN MILLER-RABIN-DECOMPOSITION ...)
; file: /usr/share/common-lisp/source/ironclad/src/math.lisp
; in: DEFUN MILLER-RABIN-DECOMPOSITION
; (ASH IRONCLAD::N -1)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do #1# (cost 3) because:
; The first argument is a INTEGER, not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #2#), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
; (1+ IRONCLAD::K)
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER 1), not a FIXNUM.
; The result is a (VALUES (INTEGER 2) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (INTEGER 1), not a FIXNUM.
; The result is a (VALUES (INTEGER 2) . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; (ASH IRONCLAD::Q -1)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do #1# (cost 3) because:
; The first argument is a INTEGER, not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #2#), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
; processing (DEFUN MILLER-RABIN-KERNEL ...)
; file: /usr/share/common-lisp/source/ironclad/src/math.lisp
; in: DEFUN MILLER-RABIN-KERNEL
; (- IRONCLAD::N 2)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; (+ (IRONCLAD:STRONG-RANDOM (- IRONCLAD::N 2)) 2)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; (1- IRONCLAD::N)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; (= IRONCLAD::Y 1)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
; (= IRONCLAD::Y IRONCLAD::MINUS1)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
; (= IRONCLAD::J IRONCLAD::K)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
; (= IRONCLAD::Y IRONCLAD::MINUS1)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
; (= IRONCLAD::Y 1)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
; (- IRONCLAD::N 2)
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; (+ (IRONCLAD:STRONG-RANDOM (- IRONCLAD::N 2)) 2)
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; (1- IRONCLAD::N)
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; (= IRONCLAD::Y IRONCLAD::MINUS1)
;
; note: forced to do full call
; unable to do #1=inline float comparison (cost 3) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
; unable to do #1# (cost 3) because:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: forced to do full call
; unable to do #1=inline float comparison (cost 3) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
; unable to do #1# (cost 3) because:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
; (1+ IRONCLAD::J)
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER 1), not a FIXNUM.
; The result is a (VALUES (INTEGER 2) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (INTEGER 1), not a FIXNUM.
; The result is a (VALUES (INTEGER 2) . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; processing (DEFUN LUCAS-SEQUENCE ...)
; file: /usr/share/common-lisp/source/ironclad/src/math.lisp
; in: DEFUN LUCAS-SEQUENCE
; (* IRONCLAD::UH IRONCLAD::VL)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; The second argument is a REAL, not a INTEGER.
; (1- (* IRONCLAD::UH IRONCLAD::VL))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (MOD (1- (* IRONCLAD::UH IRONCLAD::VL)) IRONCLAD::N)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a (OR FLOAT INTEGER).
; (* IRONCLAD::VH IRONCLAD::VL)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
; The second argument is a REAL, not a INTEGER.
; (- (* IRONCLAD::VH IRONCLAD::VL) IRONCLAD::P)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; (MOD (- (* IRONCLAD::VH IRONCLAD::VL) IRONCLAD::P) IRONCLAD::N)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a (OR FLOAT INTEGER).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (MOD (1- (* IRONCLAD::UH IRONCLAD::VL)) IRONCLAD::N)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (* IRONCLAD::UH IRONCLAD::VL)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; The second argument is a REAL, not a INTEGER.
; (MOD (* IRONCLAD::UH IRONCLAD::VL) IRONCLAD::N)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a (OR FLOAT INTEGER).
; (* IRONCLAD::VL IRONCLAD::VL)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; The second argument is a REAL, not a INTEGER.
; (- (* IRONCLAD::VL IRONCLAD::VL) 2)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0)
; (SINGLE-FLOAT 0.0)), not a FLOAT.
; (MOD (- (* IRONCLAD::VL IRONCLAD::VL) 2) IRONCLAD::N)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0)
; (RATIONAL -2)), not a SINGLE-FLOAT.
; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0)
; (RATIONAL -2)), not a DOUBLE-FLOAT.
; The second argument is a REAL, not a (OR FLOAT INTEGER).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0)
; (RATIONAL -2)), not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0)
; (RATIONAL -2)), not a FLOAT.
; (MOD (* IRONCLAD::UH IRONCLAD::VL) IRONCLAD::N)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (* IRONCLAD::UH IRONCLAD::VH)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; The second argument is a NUMBER, not a INTEGER.
; (MOD (* IRONCLAD::UH IRONCLAD::VH) IRONCLAD::N)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a (OR FLOAT INTEGER).
; (* IRONCLAD::VH IRONCLAD::VL)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
; The second argument is a REAL, not a INTEGER.
; (- (* IRONCLAD::VH IRONCLAD::VL) IRONCLAD::P)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; (MOD (- (* IRONCLAD::VH IRONCLAD::VL) IRONCLAD::P) IRONCLAD::N)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a (OR FLOAT INTEGER).
; (* IRONCLAD::VH IRONCLAD::VH)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
; The second argument is a NUMBER, not a INTEGER.
; (- (* IRONCLAD::VH IRONCLAD::VH) 2)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; (MOD (- (* IRONCLAD::VH IRONCLAD::VH) 2) IRONCLAD::N)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a (OR FLOAT INTEGER).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (MOD (- (* IRONCLAD::VH IRONCLAD::VL) IRONCLAD::P) IRONCLAD::N)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (MOD (* IRONCLAD::UH IRONCLAD::VH) IRONCLAD::N)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (* IRONCLAD::UH IRONCLAD::VL)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; The second argument is a REAL, not a INTEGER.
; (1- (* IRONCLAD::UH IRONCLAD::VL))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (MOD (1- (* IRONCLAD::UH IRONCLAD::VL)) IRONCLAD::N)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a (OR FLOAT INTEGER).
; (* IRONCLAD::VH IRONCLAD::VL)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
; The second argument is a REAL, not a INTEGER.
; (- (* IRONCLAD::VH IRONCLAD::VL) IRONCLAD::P)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; (MOD (- (* IRONCLAD::VH IRONCLAD::VL) IRONCLAD::P) IRONCLAD::N)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a (OR FLOAT INTEGER).
; (* IRONCLAD::VL IRONCLAD::VL)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; The second argument is a REAL, not a INTEGER.
; (- (* IRONCLAD::VL IRONCLAD::VL) 2)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0)
; (SINGLE-FLOAT 0.0)), not a FLOAT.
; (MOD (- (* IRONCLAD::VL IRONCLAD::VL) 2) IRONCLAD::N)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0)
; (RATIONAL -2)), not a SINGLE-FLOAT.
; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0)
; (RATIONAL -2)), not a DOUBLE-FLOAT.
; The second argument is a REAL, not a (OR FLOAT INTEGER).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0)
; (RATIONAL -2)), not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0)
; (RATIONAL -2)), not a FLOAT.
; (MOD (- (* IRONCLAD::VH IRONCLAD::VL) IRONCLAD::P) IRONCLAD::N)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (MOD (1- (* IRONCLAD::UH IRONCLAD::VL)) IRONCLAD::N)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (* IRONCLAD::UH IRONCLAD::VL)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a REAL, not a (SIGNED-BYTE 32).
; The second argument is a REAL, not a (SIGNED-BYTE 32).
; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 32) &REST
; T).
; etc.
; (1- (* IRONCLAD::UH IRONCLAD::VL))
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a REAL, not a FIXNUM.
; The result is a (VALUES REAL . #2=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The result is a (VALUES REAL . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; (MOD (1- (* IRONCLAD::UH IRONCLAD::VL)) IRONCLAD::N)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT &REST T).
; etc.
; (* IRONCLAD::VH IRONCLAD::VL)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a NUMBER, not a (SIGNED-BYTE 32).
; The second argument is a REAL, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER . #1#), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
; (- (* IRONCLAD::VH IRONCLAD::VL) IRONCLAD::P)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The second argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT &REST T).
; etc.
; (MOD (- (* IRONCLAD::VH IRONCLAD::VL) IRONCLAD::P) IRONCLAD::N)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT &REST T).
; etc.
; (* IRONCLAD::VL IRONCLAD::VL)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; The result is a (VALUES
; (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0)
; (SINGLE-FLOAT 0.0))
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a REAL, not a (SIGNED-BYTE 32).
; The second argument is a REAL, not a (SIGNED-BYTE 32).
; The result is a (VALUES
; (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0)
; (SINGLE-FLOAT 0.0))
; . #1#), not a (VALUES (SIGNED-BYTE 32) &REST T).
; etc.
; (- (* IRONCLAD::VL IRONCLAD::VL) 2)
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0)
; (SINGLE-FLOAT 0.0)), not a FIXNUM.
; The result is a (VALUES
; (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0)
; (RATIONAL -2))
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0)
; (SINGLE-FLOAT 0.0)), not a FIXNUM.
; The result is a (VALUES
; (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0)
; (RATIONAL -2))
; . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; (MOD (- (* IRONCLAD::VL IRONCLAD::VL) 2) IRONCLAD::N)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0)
; (RATIONAL -2)), not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0)
; (RATIONAL -2)), not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0)
; (RATIONAL -2)), not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0)
; (RATIONAL -2)), not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT &REST T).
; etc.
; (* IRONCLAD::UH IRONCLAD::VH)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a REAL, not a (SIGNED-BYTE 32).
; The second argument is a NUMBER, not a (SIGNED-BYTE 32).
; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 32) &REST
; T).
; etc.
; (MOD (* IRONCLAD::UH IRONCLAD::VH) IRONCLAD::N)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT &REST T).
; etc.
; (* IRONCLAD::VH IRONCLAD::VL)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a NUMBER, not a (SIGNED-BYTE 32).
; The second argument is a REAL, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER . #1#), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
; (- (* IRONCLAD::VH IRONCLAD::VL) IRONCLAD::P)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The second argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT &REST T).
; etc.
; (MOD (- (* IRONCLAD::VH IRONCLAD::VL) IRONCLAD::P) IRONCLAD::N)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT &REST T).
; etc.
; (* IRONCLAD::VH IRONCLAD::VH)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The second argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a NUMBER, not a (SIGNED-BYTE 32).
; The second argument is a NUMBER, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER . #1#), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
; (- (* IRONCLAD::VH IRONCLAD::VH) 2)
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES REAL . #2=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES REAL . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; (MOD (- (* IRONCLAD::VH IRONCLAD::VH) 2) IRONCLAD::N)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT &REST T).
; etc.
; (* IRONCLAD::UH IRONCLAD::VL)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a REAL, not a (SIGNED-BYTE 32).
; The second argument is a REAL, not a (SIGNED-BYTE 32).
; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 32) &REST
; T).
; etc.
; (1- (* IRONCLAD::UH IRONCLAD::VL))
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a REAL, not a FIXNUM.
; The result is a (VALUES REAL . #2=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The result is a (VALUES REAL . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; (MOD (1- (* IRONCLAD::UH IRONCLAD::VL)) IRONCLAD::N)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT &REST T).
; etc.
; (* IRONCLAD::VH IRONCLAD::VL)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a NUMBER, not a (SIGNED-BYTE 32).
; The second argument is a REAL, not a (SIGNED-BYTE 32).
; The result is a (VALUES NUMBER . #1#), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
; (- (* IRONCLAD::VH IRONCLAD::VL) IRONCLAD::P)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The second argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT &REST T).
; etc.
; (MOD (- (* IRONCLAD::VH IRONCLAD::VL) IRONCLAD::P) IRONCLAD::N)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT &REST T).
; etc.
; (DOTIMES (IRONCLAD::J IRONCLAD::S)
; (SETQ IRONCLAD::UH (MOD (* IRONCLAD::UH IRONCLAD::VL) IRONCLAD::N))
; (SETQ IRONCLAD::VL (MOD (- # 2) IRONCLAD::N)))
; --> BLOCK LET TAGBODY UNLESS IF >=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The second argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The second argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
; (* IRONCLAD::UH IRONCLAD::VL)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a REAL, not a (SIGNED-BYTE 32).
; The second argument is a REAL, not a (SIGNED-BYTE 32).
; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 32) &REST
; T).
; etc.
; (MOD (* IRONCLAD::UH IRONCLAD::VL) IRONCLAD::N)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT &REST T).
; etc.
; (* IRONCLAD::VL IRONCLAD::VL)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; The result is a (VALUES
; (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0)
; (SINGLE-FLOAT 0.0))
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a REAL, not a (SIGNED-BYTE 32).
; The second argument is a REAL, not a (SIGNED-BYTE 32).
; The result is a (VALUES
; (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0)
; (SINGLE-FLOAT 0.0))
; . #1#), not a (VALUES (SIGNED-BYTE 32) &REST T).
; etc.
; (- (* IRONCLAD::VL IRONCLAD::VL) 2)
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0)
; (SINGLE-FLOAT 0.0)), not a FIXNUM.
; The result is a (VALUES
; (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0)
; (RATIONAL -2))
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0)
; (SINGLE-FLOAT 0.0)), not a FIXNUM.
; The result is a (VALUES
; (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0)
; (RATIONAL -2))
; . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; (MOD (- (* IRONCLAD::VL IRONCLAD::VL) 2) IRONCLAD::N)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0)
; (RATIONAL -2)), not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0)
; (RATIONAL -2)), not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0)
; (RATIONAL -2)), not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0)
; (RATIONAL -2)), not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT &REST T).
; etc.
; (DOTIMES (IRONCLAD::J IRONCLAD::S)
; (SETQ IRONCLAD::UH (MOD (* IRONCLAD::UH IRONCLAD::VL) IRONCLAD::N))
; (SETQ IRONCLAD::VL (MOD (- # 2) IRONCLAD::N)))
; --> BLOCK LET TAGBODY PSETQ PROGN SETQ THE 1+
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 1) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 1) . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; (ASH IRONCLAD::K -1)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do #1# (cost 3) because:
; The first argument is a INTEGER, not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #2#), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
; (1+ IRONCLAD::S)
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 1) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 1) . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; processing (DEFUN PRIMEP-LUCAS ...)
; file: /usr/share/common-lisp/source/ironclad/src/math.lisp
; in: DEFUN PRIMEP-LUCAS
; (ZEROP (IRONCLAD::LUCAS-SEQUENCE (1+ IRONCLAD::N) IRONCLAD::B IRONCLAD::N))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
; (* IRONCLAD::B IRONCLAD::B)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER 3), not a FIXNUM.
; The second argument is a (INTEGER 3), not a FIXNUM.
; The result is a (VALUES (INTEGER 9) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a (INTEGER 3), not a (SIGNED-BYTE 32).
; The second argument is a (INTEGER 3), not a (SIGNED-BYTE 32).
; The result is a (VALUES (INTEGER 9) . #1#), not a (VALUES
; (SIGNED-BYTE 32) &REST
; T).
; etc.
; (- (* IRONCLAD::B IRONCLAD::B) 4)
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER 9), not a FIXNUM.
; The result is a (VALUES (INTEGER 5) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (INTEGER 9), not a FIXNUM.
; The result is a (VALUES (INTEGER 5) . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; (INCF IRONCLAD::B)
; --> THE
; ==>
; (+ 1 IRONCLAD::B)
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER 3), not a FIXNUM.
; The result is a (VALUES (INTEGER 4) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (INTEGER 3), not a FIXNUM.
; The result is a (VALUES (INTEGER 4) . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; (1+ IRONCLAD::N)
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; processing (DEFUN MODULAR-INVERSE ...)
; file: /usr/share/common-lisp/source/ironclad/src/math.lisp
; in: DEFUN MODULAR-INVERSE
; (EVENP IRONCLAD::N)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER 1), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (INTEGER 1), not a (UNSIGNED-BYTE 32).
; etc.
; (EVENP IRONCLAD::MODULUS)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER 1), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (INTEGER 1), not a (UNSIGNED-BYTE 32).
; etc.
; (FLOOR IRONCLAD::R1 IRONCLAD::R2)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a (OR (INTEGER * -1) (INTEGER 1)), not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a (OR (INTEGER * -1) (INTEGER 1)), not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #2#), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a (OR (INTEGER * -1) (INTEGER 1)), not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a (OR (INTEGER * -1) (INTEGER 1)), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (* IRONCLAD::Q IRONCLAD::U2)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (SIGNED-BYTE 32).
; The second argument is a INTEGER, not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
; (DECF IRONCLAD::U1 (* IRONCLAD::Q IRONCLAD::U2))
; --> THE SB-IMPL::XSUBTRACT BLOCK
; ==>
; (- SB-IMPL::B SB-IMPL::A)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (MINUSP IRONCLAD::INVERSE)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
; (MOD IRONCLAD::INVERSE IRONCLAD::MODULUS)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER * -1), not a FIXNUM.
; The second argument is a (INTEGER 1), not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 5) because:
; The first argument is a (INTEGER * -1), not a (SIGNED-BYTE 32).
; The second argument is a (INTEGER 1), not a (SIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; (* IRONCLAD::N IRONCLAD::INVERSE)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER 1), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a (INTEGER 1), not a (SIGNED-BYTE 32).
; The second argument is a INTEGER, not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
; (MOD (* IRONCLAD::N IRONCLAD::INVERSE) IRONCLAD::MODULUS)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR (INTEGER * -1) (INTEGER 1)), not a FIXNUM.
; The second argument is a (INTEGER 1), not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (OR (INTEGER * -1) (INTEGER 1)), not a (UNSIGNED-BYTE
; 32).
; The second argument is a (INTEGER 1), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; processing (DEFUN MODULAR-INVERSE-WITH-BLINDING ...)
; file: /usr/share/common-lisp/source/ironclad/src/math.lisp
; in: DEFUN MODULAR-INVERSE-WITH-BLINDING
; (+ 1 (IRONCLAD:STRONG-RANDOM (- IRONCLAD::MODULUS 1)))
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; (GCD IRONCLAD::B IRONCLAD::MODULUS)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a INTEGER, not a (OR (INTEGER -536870912 -1)
; (INTEGER 1 536870911)).
; The second argument is a (INTEGER 1), not a (OR (INTEGER -536870912 -1)
; (INTEGER 1 536870911)).
; (- IRONCLAD::MODULUS 1)
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER 1), not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (INTEGER 1), not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE . #2#), not a (VALUES FIXNUM &REST
; T).
; etc.
; (+ 1 (IRONCLAD:STRONG-RANDOM (- IRONCLAD::MODULUS 1)))
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; (* IRONCLAD::N IRONCLAD::B)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
; The second argument is a INTEGER, not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
; (MOD (* IRONCLAD::N IRONCLAD::B) IRONCLAD::MODULUS)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR (INTEGER * -1) (INTEGER 1)), not a FIXNUM.
; The second argument is a (INTEGER 1), not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (OR (INTEGER * -1) (INTEGER 1)), not a (UNSIGNED-BYTE
; 32).
; The second argument is a (INTEGER 1), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (* IRONCLAD::Y IRONCLAD::B)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (SIGNED-BYTE 32).
; The second argument is a INTEGER, not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
; (MOD (* IRONCLAD::Y IRONCLAD::B) IRONCLAD::MODULUS)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR (INTEGER * -1) (INTEGER 1)), not a FIXNUM.
; The second argument is a (INTEGER 1), not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (OR (INTEGER * -1) (INTEGER 1)), not a (UNSIGNED-BYTE
; 32).
; The second argument is a (INTEGER 1), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; processing (DEFUN EXPT-MOD ...)
; file: /usr/share/common-lisp/source/ironclad/src/math.lisp
; in: DEFUN EXPT-MOD
; (ASSERT (<= 0 IRONCLAD::EXPONENT IRONCLAD::MODULUS))
; --> LET WHEN IF <=
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (ASSERT (> IRONCLAD::MODULUS 1))
; --> LET WHEN IF
; ==>
; (> #:TEMP5 1)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; etc.
; (* IRONCLAD::R0 IRONCLAD::R1)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (SIGNED-BYTE 32).
; The second argument is a INTEGER, not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
; (MOD (* IRONCLAD::R0 IRONCLAD::R1) IRONCLAD::MODULUS)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER * -1), not a FIXNUM.
; The second argument is a (INTEGER 2), not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 5) because:
; The first argument is a (INTEGER * -1), not a (SIGNED-BYTE 32).
; The second argument is a (INTEGER 2), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; (* IRONCLAD::R1 IRONCLAD::R1)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (SIGNED-BYTE 32).
; The second argument is a INTEGER, not a (SIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
; (* IRONCLAD::R0 IRONCLAD::R1)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (SIGNED-BYTE 32).
; The second argument is a INTEGER, not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; etc.
; (MOD (* IRONCLAD::R0 IRONCLAD::R1) IRONCLAD::MODULUS)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER * -1), not a FIXNUM.
; The second argument is a (INTEGER 2), not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 5) because:
; The first argument is a (INTEGER * -1), not a (SIGNED-BYTE 32).
; The second argument is a (INTEGER 2), not a (SIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 32)
; &REST T).
; (* IRONCLAD::R0 IRONCLAD::R0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do inline (signed-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (SIGNED-BYTE 32).
; The second argument is a INTEGER, not a (SIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
; processing (DEFUN EXPT-MOD/UNSAFE ...)
; processing (DEFCONST +SMALL-PRIMES+ ...)
; processing (DEFCONSTANT +LAST-SMALL-PRIME+ ...)
; processing (DEFUN GENERATE-SMALL-PRIMES ...)
; processing (DEFPARAMETER *NUMBER-OF-MILLER-RABIN-TESTS* ...)
; processing (DEFUN PRIME-P ...)
; file: /usr/share/common-lisp/source/ironclad/src/math.lisp
; in: DEFUN PRIME-P
; (LOOP IRONCLAD::REPEAT IRONCLAD:*NUMBER-OF-MILLER-RABIN-TESTS*
; IRONCLAD::ALWAYS (IRONCLAD::MILLER-RABIN-KERNEL IRONCLAD::N IRONCLAD::Q
; IRONCLAD::K))
; --> LET CEILING
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (<= IRONCLAD::N IRONCLAD::+LAST-SMALL-PRIME+)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; (LOOP IRONCLAD::REPEAT IRONCLAD:*NUMBER-OF-MILLER-RABIN-TESTS*
; IRONCLAD::ALWAYS (IRONCLAD::MILLER-RABIN-KERNEL IRONCLAD::N IRONCLAD::Q
; IRONCLAD::K))
; --> LET CEILING
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL #1=(-1) #2=(1)))
; . #3=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (OR FLOAT (RATIONAL #1# #2#)) . #3#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; --> LET TAGBODY IF <=
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
; --> LET TAGBODY IF DECF SETQ THE SB-IMPL::XSUBTRACT BLOCK
; ==>
; (- SB-IMPL::B SB-IMPL::A)
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER 1), not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (INTEGER 1), not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE . #2#), not a (VALUES FIXNUM &REST
; T).
; etc.
; processing (DEFUN GENERATE-PRIME-IN-RANGE ...)
; processing (DEFUN GENERATE-PRIME ...)
; processing (DEFUN GENERATE-SAFE-PRIME ...)
; processing (DEFUN FIND-GENERATOR ...)
; processing (DEFUN FIND-SUBGROUP-GENERATOR ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/math-tmpOGATR1ZQ.fasl
; compilation finished in 0:00:01.036
; compiling file "/usr/share/common-lisp/source/ironclad/src/octet-stream.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :CRYPTO)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...)
; processing (DEFCLASS OCTET-STREAM ...)
; processing (DEFMETHOD STREAM-ELEMENT-TYPE ...)
; processing (DEFMACRO DEFINE-STREAM-READ-SEQUENCE ...)
; processing (DEFMACRO DEFINE-STREAM-WRITE-SEQUENCE ...)
; processing (DEFCLASS OCTET-INPUT-STREAM ...)
; processing (DEFMETHOD SB-GRAY:STREAM-READ-BYTE ...)
; processing (DEFINE-STREAM-READ-SEQUENCE OCTET-INPUT-STREAM ...)
; processing (DEFUN MAKE-OCTET-INPUT-STREAM ...)
; processing (DEFMACRO WITH-OCTET-INPUT-STREAM ...)
; processing (DEFCLASS OCTET-OUTPUT-STREAM ...)
; processing (DEFMETHOD SB-GRAY:STREAM-WRITE-BYTE ...)
; processing (DEFINE-STREAM-WRITE-SEQUENCE OCTET-OUTPUT-STREAM ...)
; processing (DEFMETHOD SB-GRAY:STREAM-CLEAR-OUTPUT ...)
; processing (DEFUN GET-OUTPUT-STREAM-OCTETS ...)
; processing (DEFUN MAKE-OCTET-OUTPUT-STREAM ...)
; processing (DEFMACRO WITH-OCTET-OUTPUT-STREAM ...)
; processing (DEFCLASS DIGESTING-STREAM ...)
; processing (DEFMETHOD STREAM-ELEMENT-TYPE ...)
; processing (DEFUN MAKE-DIGESTING-STREAM ...)
; processing (DEFMETHOD SB-GRAY:STREAM-WRITE-BYTE ...)
; processing (DEFINE-STREAM-WRITE-SEQUENCE DIGESTING-STREAM ...)
; processing (DEFMETHOD SB-GRAY:STREAM-CLEAR-OUTPUT ...)
; processing (DEFMETHOD PRODUCE-DIGEST ...)
; processing (DEFUN EXECUTE-WITH-DIGESTING-STREAM ...)
; processing (DEFMACRO WITH-DIGESTING-STREAM ...)
; processing (DEFCLASS CRYPTING-STREAM ...)
; processing (DEFMETHOD STREAM-ELEMENT-TYPE ...)
; processing (DEFCLASS ENCRYPTING-INPUT-STREAM ...)
; processing (DEFCLASS ENCRYPTING-OUTPUT-STREAM ...)
; processing (DEFCLASS DECRYPTING-INPUT-STREAM ...)
; processing (DEFCLASS DECRYPTING-OUTPUT-STREAM ...)
; processing (DEFTYPE STREAM-DIRECTION ...)
; processing (DEFUN MAKE-ENCRYPTING-STREAM ...)
; processing (DEFUN MAKE-DECRYPTING-STREAM ...)
; processing (DEFMETHOD SB-GRAY:STREAM-READ-BYTE ...)
; processing (DEFMETHOD SB-GRAY:STREAM-READ-BYTE ...)
; processing (DEFMETHOD SB-GRAY:STREAM-WRITE-BYTE ...)
; processing (DEFMETHOD SB-GRAY:STREAM-WRITE-BYTE ...)
; processing (DEFINE-STREAM-READ-SEQUENCE ENCRYPTING-INPUT-STREAM ...)
; processing (DEFINE-STREAM-READ-SEQUENCE DECRYPTING-INPUT-STREAM ...)
; processing (DEFINE-STREAM-WRITE-SEQUENCE ENCRYPTING-OUTPUT-STREAM ...)
; processing (DEFINE-STREAM-WRITE-SEQUENCE DECRYPTING-OUTPUT-STREAM ...)
; processing (DEFMACRO WITH-ENCRYPTING-STREAM ...)
; processing (DEFMACRO WITH-DECRYPTING-STREAM ...)
; processing (DEFCLASS AUTHENTICATING-STREAM ...)
; processing (DEFMETHOD STREAM-ELEMENT-TYPE ...)
; processing (DEFUN MAKE-AUTHENTICATING-STREAM ...)
; processing (DEFMETHOD SB-GRAY:STREAM-WRITE-BYTE ...)
; processing (DEFINE-STREAM-WRITE-SEQUENCE AUTHENTICATING-STREAM ...)
; processing (DEFMETHOD PRODUCE-MAC ...)
; processing (DEFMACRO WITH-AUTHENTICATING-STREAM ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/octet-stream-tmpHGK85T33.fasl
; compilation finished in 0:00:01.576
; compiling file "/usr/share/common-lisp/source/ironclad/src/aead/aead.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :CRYPTO)
; processing (DEFCLASS AEAD-MODE ...)
; processing (DEFMETHOD SHARED-INITIALIZE ...)
; processing (DEFUN AEADP ...)
; processing (DEFUN LIST-ALL-AUTHENTICATED-ENCRYPTION-MODES ...)
; processing (DEFUN AUTHENTICATED-ENCRYPTION-MODE-SUPPORTED-P ...)
; processing (DEFMACRO DEFAEAD ...)
; processing (DEFUN MAKE-AUTHENTICATED-ENCRYPTION-MODE ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/aead/aead-tmpO57EVK61.fasl
; compilation finished in 0:00:00.088
; compiling file "/usr/share/common-lisp/source/ironclad/src/kdf/kdf.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :CRYPTO)
; processing (DEFUN LIST-ALL-KDFS ...)
; processing (DEFUN MAKE-KDF ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/kdf/kdf-tmpADEQGDMC.fasl
; compilation finished in 0:00:00.076
; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/public-key.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :CRYPTO)
; processing (DEFUN LIST-ALL-KEY-PAIR-KINDS ...)
; processing (DEFCLASS DISCRETE-LOGARITHM-GROUP ...)
; processing (DEFPARAMETER *SIGNATURE-NONCE-FOR-TEST* ...)
; processing (DEFUN OCTETS-TO-INTEGER ...)
; file: /usr/share/common-lisp/source/ironclad/src/public-key/public-key.lisp
; in: DEFUN OCTETS-TO-INTEGER
; (- IRONCLAD::END IRONCLAD::START)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; (CEILING IRONCLAD::N-BITS 8)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; convert division by 2^k to shift
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; convert integer division to multiplication
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 32).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
; (MIN (CEILING IRONCLAD::N-BITS 8) IRONCLAD::SIZE)
;
; note: unable to open code because: The operands might not be the same type.
; (CEILING IRONCLAD::N-BITS 8)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (* 8 IRONCLAD::SIZE)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
;
; note: unable to
; associate */(* /) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; (- IRONCLAD::END IRONCLAD::N-BYTES)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; (+ IRONCLAD::START IRONCLAD::N-BYTES)
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT)
; (COMPLEX DOUBLE-FLOAT)).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a REAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a REAL.
; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; (LDB (BYTE IRONCLAD::N-BITS 0) IRONCLAD::SUM)
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (LOOP IRONCLAD::FOR IRONCLAD::I IRONCLAD::FROM IRONCLAD::START IRONCLAD::BELOW (+
; IRONCLAD::START
; IRONCLAD::N-BYTES)
; IRONCLAD::FOR IRONCLAD::J IRONCLAD::FROM 0 IRONCLAD::BY ...)
; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY WHEN IF >=
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to open code because: The operands might not be the same type.
; (LOOP IRONCLAD::WITH
; IRONCLAD::SUM = 0
; IRONCLAD::FOR IRONCLAD::I IRONCLAD::FROM (- IRONCLAD::END
; IRONCLAD::N-BYTES) IRONCLAD::BELOW
; IRONCLAD::END
; DO ...)
; --> LET LET TAGBODY WHEN IF >=
; ==>
; 1
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion in mixed numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to open code because: The operands might not be the same type.
; (- IRONCLAD::END IRONCLAD::START)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The second argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a (NOT NULL), not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER . #1#), not a (VALUES SINGLE-FLOAT &REST T).
; etc.
; (* 8 IRONCLAD::SIZE)
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; (CEILING IRONCLAD::N-BITS 8)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; (MIN (CEILING IRONCLAD::N-BITS 8) IRONCLAD::SIZE)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a REAL, not a (UNSIGNED-BYTE 32).
; etc.
; (+ IRONCLAD::START IRONCLAD::N-BYTES)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The second argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER . #1#), not a (VALUES SINGLE-FLOAT &REST T).
; etc.
; (LOOP IRONCLAD::FOR IRONCLAD::I IRONCLAD::FROM IRONCLAD::START IRONCLAD::BELOW (+
; IRONCLAD::START
; IRONCLAD::N-BYTES)
; IRONCLAD::FOR IRONCLAD::J IRONCLAD::FROM 0 IRONCLAD::BY ...)
; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY WHEN IF >=
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline float comparison (cost 3) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
; unable to do #1# (cost 3) because:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
; etc.
;
; note: forced to do full call
; unable to do #1=inline float comparison (cost 3) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
; unable to do #1# (cost 3) because:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
; (ASH (AREF IRONCLAD::OCTET-VEC IRONCLAD::I) IRONCLAD::J)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 2) because:
; The second argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 29).
; The result is a (VALUES UNSIGNED-BYTE . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do #1# (cost 3) because:
; The second argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 29).
; The result is a (VALUES UNSIGNED-BYTE . #2#), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
; (LOOP IRONCLAD::FOR IRONCLAD::I IRONCLAD::FROM IRONCLAD::START IRONCLAD::BELOW (+
; IRONCLAD::START
; IRONCLAD::N-BYTES)
; IRONCLAD::FOR IRONCLAD::J IRONCLAD::FROM 0 IRONCLAD::BY ...)
; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
; ==>
; (+ #:LOOP-SUM-3 (ASH (AREF IRONCLAD::OCTET-VEC IRONCLAD::I) IRONCLAD::J))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The second argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The second argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY WHEN IF >=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The second argument is a REAL, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The second argument is a REAL, not a (UNSIGNED-BYTE 32).
; etc.
; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE
; ==>
; (+ IRONCLAD::J 8)
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 8) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 8) . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; (- IRONCLAD::END IRONCLAD::N-BYTES)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The second argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER . #1#), not a (VALUES SINGLE-FLOAT &REST T).
; etc.
; (LOOP IRONCLAD::WITH
; IRONCLAD::SUM = 0
; IRONCLAD::FOR IRONCLAD::I IRONCLAD::FROM (- IRONCLAD::END
; IRONCLAD::N-BYTES) IRONCLAD::BELOW
; IRONCLAD::END
; DO ...)
; --> LET LET TAGBODY WHEN IF >=
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline float comparison (cost 3) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
; unable to do #1# (cost 3) because:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
; etc.
;
; note: forced to do full call
; unable to do #1=inline float comparison (cost 3) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
; unable to do #1# (cost 3) because:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
; (ASH IRONCLAD::SUM 8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; (+ (ASH IRONCLAD::SUM 8) (AREF IRONCLAD::OCTET-VEC IRONCLAD::I))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; processing (DEFUN INTEGER-TO-OCTETS ...)
; file: /usr/share/common-lisp/source/ironclad/src/public-key/public-key.lisp
; in: DEFUN INTEGER-TO-OCTETS
; (LDB (BYTE IRONCLAD::N-BITS 0) BIGNUM)
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (LDB (BYTE 8 (* IRONCLAD::I 8)) BIGNUM)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The second argument is a (INTEGER -536870880 0), not a (UNSIGNED-BYTE 29).
; The result is a (VALUES UNSIGNED-BYTE . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do #1# (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
; The second argument is a (INTEGER -536870880 0), not a (UNSIGNED-BYTE 29).
; The result is a (VALUES UNSIGNED-BYTE . #2#), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
; (LDB (BYTE 8 BYTE) BIGNUM)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The second argument is a (INTEGER -536870880 0), not a (UNSIGNED-BYTE 29).
; The result is a (VALUES UNSIGNED-BYTE . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do #1# (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
; The second argument is a (INTEGER -536870880 0), not a (UNSIGNED-BYTE 29).
; The result is a (VALUES UNSIGNED-BYTE . #2#), not a (VALUES
; (SIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; etc.
; processing (DEFUN MAYBE-INTEGERIZE ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/public-key/public-key-tmpJWIU1IZ7.fasl
; compilation finished in 0:00:00.192
; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/pkcs1.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :CRYPTO)
; processing (DEFUN MGF ...)
; processing (DECLAIM (NOTINLINE OAEP-ENCODE))
; processing (DEFUN OAEP-ENCODE ...)
; processing (DEFUN OAEP-DECODE ...)
; processing (DECLAIM (NOTINLINE PSS-ENCODE))
; processing (DEFUN PSS-ENCODE ...)
; processing (DEFUN PSS-VERIFY ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/public-key/pkcs1-tmp68IBTR7G.fasl
; compilation finished in 0:00:00.296
; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/elliptic-curve.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :CRYPTO)
; processing (DEFGENERIC EC-POINT-ON-CURVE-P ...)
; processing (DEFGENERIC EC-POINT-EQUAL ...)
; processing (DEFGENERIC EC-DOUBLE ...)
; processing (DEFGENERIC EC-ADD ...)
; processing (DEFGENERIC EC-SCALAR-MULT ...)
; processing (DEFGENERIC EC-SCALAR-INV ...)
; processing (DEFGENERIC EC-ENCODE-SCALAR ...)
; processing (DEFGENERIC EC-DECODE-SCALAR ...)
; processing (DEFGENERIC EC-ENCODE-POINT ...)
; processing (DEFGENERIC EC-DECODE-POINT ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/public-key/elliptic-curve-tmpEHEI45UL.fasl
; compilation finished in 0:00:00.008
; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/aes.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :CRYPTO)
; processing (IN-IRONCLAD-READTABLE)
; processing (DECLAIM (TYPE # ...))
; processing (DEFCONST TE0 ...)
; processing (DEFCONST TE1 ...)
; processing (DEFCONST TE2 ...)
; processing (DEFCONST TE3 ...)
; processing (DEFCONST TE4 ...)
; processing (DEFCONST TD0 ...)
; processing (DEFCONST TD1 ...)
; processing (DEFCONST TD2 ...)
; processing (DEFCONST TD3 ...)
; processing (DEFCONST TD4 ...)
; processing (DECLAIM (TYPE # ...))
; processing (DEFCONST ROUND-CONSTANTS ...)
; processing (DEFTYPE AES-ROUND-KEYS ...)
; processing (DEFCLASS AES ...)
; processing (DEFUN ALLOCATE-ROUND-KEYS ...)
; processing (DEFUN GENERATE-128-BIT-ROUND-KEYS ...)
; processing (DEFUN GENERATE-192-BIT-ROUND-KEYS ...)
; processing (DEFUN GENERATE-256-BIT-ROUND-KEYS ...)
; processing (DEFUN GENERATE-ROUND-KEYS-FOR-ENCRYPTION ...)
; processing (DEFUN GENERATE-ROUND-KEYS-FOR-DECRYPTION ...)
; processing (MACROLET (# # ...) ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/aes.lisp
; in: DEFINE-BLOCK-ENCRYPTOR AES
; (IRONCLAD::STORE-WORDS IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START
; (IRONCLAD::APPLY-ROUND (IRONCLAD::RK-REF 0) IRONCLAD::T0 IRONCLAD::T1
; IRONCLAD::T2 IRONCLAD::T3)
; (IRONCLAD::APPLY-ROUND (IRONCLAD::RK-REF 1) IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::T3 IRONCLAD::T0)
; (IRONCLAD::APPLY-ROUND (IRONCLAD::RK-REF 2) IRONCLAD::T2 IRONCLAD::T3
; IRONCLAD::T0 IRONCLAD::T1)
; (IRONCLAD::APPLY-ROUND (IRONCLAD::RK-REF 3) IRONCLAD::T3 IRONCLAD::T0
; IRONCLAD::T1 IRONCLAD::T2))
; --> SETF LET* FUNCALL
; ==>
; 1
;
; note: doing unsigned word to integer coercion (cost 20) to "<return value>"
; in: DEFINE-BLOCK-DECRYPTOR AES
; (IRONCLAD::STORE-WORDS IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START
; (IRONCLAD::APPLY-ROUND (IRONCLAD::RK-REF 0) IRONCLAD::T0 IRONCLAD::T3
; IRONCLAD::T2 IRONCLAD::T1)
; (IRONCLAD::APPLY-ROUND (IRONCLAD::RK-REF 1) IRONCLAD::T1 IRONCLAD::T0
; IRONCLAD::T3 IRONCLAD::T2)
; (IRONCLAD::APPLY-ROUND (IRONCLAD::RK-REF 2) IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::T0 IRONCLAD::T3)
; (IRONCLAD::APPLY-ROUND (IRONCLAD::RK-REF 3) IRONCLAD::T3 IRONCLAD::T2
; IRONCLAD::T1 IRONCLAD::T0))
; --> SETF LET* FUNCALL
; ==>
; 1
;
; note: doing unsigned word to integer coercion (cost 20) to "<return value>"
; processing (DEFMETHOD SCHEDULE-KEY ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/aes.lisp
; in: DEFMETHOD SCHEDULE-KEY (AES T)
; (LET ((IRONCLAD::ENCRYPTION-KEYS
; (IRONCLAD::ALLOCATE-ROUND-KEYS IRONCLAD::KEY))
; (IRONCLAD::DECRYPTION-KEYS
; (IRONCLAD::ALLOCATE-ROUND-KEYS IRONCLAD::KEY))
; (IRONCLAD::N-ROUNDS
; (ECASE (LENGTH IRONCLAD::KEY) (16 10) (24 12) (32 14))))
; (DECLARE
; (TYPE IRONCLAD::AES-ROUND-KEYS IRONCLAD::ENCRYPTION-KEYS
; IRONCLAD::DECRYPTION-KEYS))
; (SETF (IRONCLAD::ENCRYPTION-ROUND-KEYS IRONCLAD::CIPHER)
; IRONCLAD::ENCRYPTION-KEYS
; (IRONCLAD::DECRYPTION-ROUND-KEYS IRONCLAD::CIPHER)
; IRONCLAD::DECRYPTION-KEYS
; (IRONCLAD::N-ROUNDS IRONCLAD::CIPHER) IRONCLAD::N-ROUNDS)
; IRONCLAD::CIPHER)
;
; note: deleting unreachable code
;
; note: deleting unreachable code
; processing (DEFCIPHER AES ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/ciphers/aes-tmpMXSI408M.fasl
; compilation finished in 0:00:01.716
; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/arcfour.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :CRYPTO)
; processing (DEFTYPE ARCFOUR-SBOX ...)
; processing (DEFCLASS ARCFOUR ...)
; processing (DEFUN ARCFOUR-KEYIFY ...)
; processing (DEFINE-STREAM-CRYPTOR ARCFOUR ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/arcfour.lisp
; in: DEFINE-STREAM-CRYPTOR ARCFOUR
; (AREF IRONCLAD::PLAINTEXT (+ IRONCLAD::PLAINTEXT-START IRONCLAD::I))
;
; note: doing signed word to integer coercion (cost 20), for:
; the third argument of CHECK-BOUND
; (SETF (AREF IRONCLAD::CIPHERTEXT (+ IRONCLAD::CIPHERTEXT-START IRONCLAD::I))
; (LOGXOR
; (AREF IRONCLAD::PLAINTEXT (+ IRONCLAD::PLAINTEXT-START IRONCLAD::I))
; (AREF IRONCLAD::M (LDB # #))))
; --> FUNCALL
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20), for:
; the third argument of CHECK-BOUND
; processing (DEFMETHOD SCHEDULE-KEY ...)
; processing (DEFCIPHER ARCFOUR ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/ciphers/arcfour-tmpXDY5GIMS.fasl
; compilation finished in 0:00:00.132
; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/aria.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :CRYPTO)
; processing (DEFCONST +ARIA-S1+ ...)
; processing (DEFCONST +ARIA-S2+ ...)
; processing (DEFCONST +ARIA-X1+ ...)
; processing (DEFCONST +ARIA-X2+ ...)
; processing (DEFCONST +ARIA-C1+ ...)
; processing (DEFCONST +ARIA-C2+ ...)
; processing (DEFCONST +ARIA-C3+ ...)
; processing (DEFMACRO ARIA-BRF ...)
; processing (DEFMACRO ARIA-KXL ...)
; processing (DEFMACRO ARIA-SBL1-M ...)
; processing (DEFMACRO ARIA-SBL2-M ...)
; processing (DEFMACRO ARIA-P ...)
; processing (DEFMACRO ARIA-M ...)
; processing (DEFMACRO ARIA-MM ...)
; processing (DEFMACRO ARIA-FO ...)
; processing (DEFMACRO ARIA-FE ...)
; processing (DEFUN ARIA-GSRK ...)
; processing (DEFUN ARIA-PROCESS-BLOCK ...)
; processing (DEFCLASS ARIA ...)
; processing (DEFMETHOD SCHEDULE-KEY ...)
; processing (DEFINE-BLOCK-ENCRYPTOR ARIA ...)
; processing (DEFINE-BLOCK-DECRYPTOR ARIA ...)
; processing (DEFCIPHER ARIA ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/ciphers/aria-tmpEPS53BQD.fasl
; compilation finished in 0:00:03.684
; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/blowfish.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :CRYPTO)
; processing (IN-IRONCLAD-READTABLE)
; processing (DEFCONST +BLOWFISH-N-ROUNDS+ ...)
; processing (DECLAIM (TYPE # ...))
; processing (DEFCONST +P-ARRAY+ ...)
; processing (DECLAIM (TYPE # ...))
; processing (DEFCONST +S-BOX-0+ ...)
; processing (DEFCONST +S-BOX-1+ ...)
; processing (DEFCONST +S-BOX-2+ ...)
; processing (DEFCONST +S-BOX-3+ ...)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL) ...)
; processing (DEFCLASS BLOWFISH ...)
; processing (MACROLET (# # ...) ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/blowfish.lisp
; in:
; MACROLET ((S-BOX (S-BOXES WHICH INDEX)
; `(AREF ,S-BOXES (+ (* 256 ,WHICH) ,INDEX)))
; (S-BOX-0 (S-BOXES INDEX) `(S-BOX ,S-BOXES 0 ,INDEX))
; (S-BOX-1 (S-BOXES INDEX) `(S-BOX ,S-BOXES 1 ,INDEX))
; (S-BOX-2 (S-BOXES INDEX) `(S-BOX ,S-BOXES 2 ,INDEX))
; (S-BOX-3 (S-BOXES INDEX) `(S-BOX ,S-BOXES 3 ,INDEX)))
; (DECLAIM (INLINE IRONCLAD::BLOWFISH-ENCRYPT-BLOCK*))
; ==>
; (SB-C::%PROCLAIM '(INLINE IRONCLAD::BLOWFISH-ENCRYPT-BLOCK*)
; (SB-C:SOURCE-LOCATION))
;
; caught STYLE-WARNING:
; Proclaiming IRONCLAD::BLOWFISH-ENCRYPT-BLOCK* to be INLINE, but 2 calls to it
; were previously compiled. A declaration of NOTINLINE at the call sites will
; eliminate this warning, as will proclaiming and defining the function before
; its first potential use.
; in: DEFUN BLOWFISH-ENCRYPT-BLOCK*
; (IRONCLAD::STORE-WORDS IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START
; IRONCLAD::RIGHT IRONCLAD::LEFT)
; --> PROGN SETF LET* FUNCALL
; ==>
; 1
;
; note: doing unsigned word to integer coercion (cost 20) from LEFT to "<return value>"
; in: DEFUN BLOWFISH-DECRYPT-BLOCK*
; (IRONCLAD::STORE-WORDS IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START
; IRONCLAD::RIGHT IRONCLAD::LEFT)
; --> PROGN SETF LET* FUNCALL
; ==>
; 1
;
; note: doing unsigned word to integer coercion (cost 20) from LEFT to "<return value>"
; processing (DEFCIPHER BLOWFISH ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/ciphers/blowfish-tmpXU06KPUG.fasl
; compilation finished in 0:00:02.116
WARNING:
Lisp compilation had style-warnings while
compiling #<CL-SOURCE-FILE "ironclad/cipher/blowfish" "blowfish">
; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/camellia.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :CRYPTO)
; processing (DEFCONST +CAMELLIA-SBOX1+ ...)
; processing (DEFCONST +CAMELLIA-SBOX2+ ...)
; processing (DEFCONST +CAMELLIA-SBOX3+ ...)
; processing (DEFCONST +CAMELLIA-SBOX4+ ...)
; processing (DEFCONST +CAMELLIA-SIGMA+ ...)
; processing (DEFCONST +CAMELLIA-KSFT1+ ...)
; processing (DEFCONST +CAMELLIA-KIDX1+ ...)
; processing (DEFCONST +CAMELLIA-KSFT2+ ...)
; processing (DEFCONST +CAMELLIA-KIDX2+ ...)
; processing (DECLAIM (FTYPE # ...) ...)
; processing (DEFUN CAMELLIA-FEISTEL ...)
; processing (DEFCLASS CAMELLIA ...)
; processing (DEFMETHOD SCHEDULE-KEY ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/camellia.lisp
; in: DEFMETHOD SCHEDULE-KEY (CAMELLIA T)
; (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 32))
;
; note: could not stack allocate: (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 32))
; processing (DEFINE-BLOCK-ENCRYPTOR CAMELLIA ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/camellia.lisp
; in: DEFINE-BLOCK-ENCRYPTOR CAMELLIA
; (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 32))
;
; note: could not stack allocate: (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 32))
; (IRONCLAD::DEFINE-BLOCK-ENCRYPTOR IRONCLAD:CAMELLIA
; 16
; (LET ((IRONCLAD::ROUND-KEYS (IRONCLAD::ROUND-KEYS IRONCLAD::CONTEXT))
; (IRONCLAD::KEYS-START 4)
; (IRONCLAD::GRAND-ROUNDS (IRONCLAD::GRAND-ROUNDS IRONCLAD::CONTEXT))
; (IRONCLAD::DATA (MAKE-ARRAY 4 :ELEMENT-TYPE '#)))
; (DECLARE (TYPE (SIMPLE-ARRAY # #) IRONCLAD::ROUND-KEYS IRONCLAD::DATA)
; (TYPE FIXNUM IRONCLAD::KEYS-START IRONCLAD::GRAND-ROUNDS)
; (DYNAMIC-EXTENT IRONCLAD::DATA))
; (SETF (AREF IRONCLAD::DATA 0) (LOGXOR # #)
; (AREF IRONCLAD::DATA 1) (LOGXOR # #)
; (AREF IRONCLAD::DATA 2) (LOGXOR # #)
; (AREF IRONCLAD::DATA 3) (LOGXOR # #))
; (DOTIMES (IRONCLAD::I IRONCLAD::GRAND-ROUNDS)
; (DOTIMES (IRONCLAD::J 3)
; (IRONCLAD::CAMELLIA-FEISTEL IRONCLAD::DATA 0 IRONCLAD::ROUND-KEYS
; IRONCLAD::KEYS-START 2)
; (INCF IRONCLAD::KEYS-START 4))
; (WHEN (< IRONCLAD::I #) (SETF #) (INCF IRONCLAD::KEYS-START 4)))
; (ROTATEF (AREF IRONCLAD::DATA 0) (AREF IRONCLAD::DATA 2))
; (ROTATEF (AREF IRONCLAD::DATA 1) (AREF IRONCLAD::DATA 3))
; (SETF (IRONCLAD:UB32REF/BE IRONCLAD::CIPHERTEXT
; IRONCLAD::CIPHERTEXT-START)
; (LOGXOR # #))
; (SETF (IRONCLAD:UB32REF/BE IRONCLAD::CIPHERTEXT #) (LOGXOR # #))
; (SETF (IRONCLAD:UB32REF/BE IRONCLAD::CIPHERTEXT #) (LOGXOR # #))
; (SETF (IRONCLAD:UB32REF/BE IRONCLAD::CIPHERTEXT #) (LOGXOR # #))))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA IRONCLAD::CAMELLIA-ENCRYPT-BLOCK
; (IRONCLAD::CONTEXT IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START
; IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (DECLARE (OPTIMIZE (SPEED 3) (DEBUG 0) (SPACE 0)))
; (DECLARE
; (TYPE IRONCLAD::SIMPLE-OCTET-VECTOR IRONCLAD::PLAINTEXT
; IRONCLAD::CIPHERTEXT)
; (TYPE (INTEGER 0 536870893) IRONCLAD::PLAINTEXT-START
; IRONCLAD::CIPHERTEXT-START))
; (BLOCK IRONCLAD::CAMELLIA-ENCRYPT-BLOCK
; (LET ((IRONCLAD::ROUND-KEYS #)
; (IRONCLAD::KEYS-START 4)
; (IRONCLAD::GRAND-ROUNDS #)
; (IRONCLAD::DATA #))
; (DECLARE (TYPE # IRONCLAD::ROUND-KEYS IRONCLAD::DATA)
; (TYPE FIXNUM IRONCLAD::KEYS-START IRONCLAD::GRAND-ROUNDS)
; (DYNAMIC-EXTENT IRONCLAD::DATA))
; (SETF # #
; # #
; # #
; # #)
; (DOTIMES (IRONCLAD::I IRONCLAD::GRAND-ROUNDS)
; (DOTIMES # # #)
; (WHEN # # #))
; (ROTATEF (AREF IRONCLAD::DATA 0) (AREF IRONCLAD::DATA 2))
; (ROTATEF (AREF IRONCLAD::DATA 1) (AREF IRONCLAD::DATA 3))
; (SETF # #)
; (SETF # #)
; (SETF # #)
; (SETF # #))))
;
; note: doing unsigned word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-BLOCK-DECRYPTOR CAMELLIA ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/camellia.lisp
; in: DEFINE-BLOCK-DECRYPTOR CAMELLIA
; (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 32))
;
; note: could not stack allocate: (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 32))
; (DECF IRONCLAD::KEYS-START 2)
; --> THE SB-IMPL::XSUBTRACT BLOCK
; ==>
; (- SB-IMPL::B SB-IMPL::A)
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 32) arithmetic
; (IRONCLAD::DEFINE-BLOCK-DECRYPTOR IRONCLAD:CAMELLIA
; 16
; (LET* ((IRONCLAD::ROUND-KEYS (IRONCLAD::ROUND-KEYS IRONCLAD::CONTEXT))
; (IRONCLAD::GRAND-ROUNDS (IRONCLAD::GRAND-ROUNDS IRONCLAD::CONTEXT))
; (IRONCLAD::KEYS-START
; (IF #
; 48
; 64))
; (IRONCLAD::DATA (MAKE-ARRAY 4 :ELEMENT-TYPE '#)))
; (DECLARE (TYPE (SIMPLE-ARRAY # #) IRONCLAD::ROUND-KEYS IRONCLAD::DATA)
; (TYPE FIXNUM IRONCLAD::KEYS-START IRONCLAD::GRAND-ROUNDS)
; (DYNAMIC-EXTENT IRONCLAD::DATA))
; (SETF (AREF IRONCLAD::DATA 0) (LOGXOR # #)
; (AREF IRONCLAD::DATA 1) (LOGXOR # #)
; (AREF IRONCLAD::DATA 2) (LOGXOR # #)
; (AREF IRONCLAD::DATA 3) (LOGXOR # #))
; (DECF IRONCLAD::KEYS-START 2)
; (DOTIMES (IRONCLAD::I IRONCLAD::GRAND-ROUNDS)
; (DOTIMES (IRONCLAD::J 3)
; (IRONCLAD::CAMELLIA-FEISTEL IRONCLAD::DATA 0 IRONCLAD::ROUND-KEYS
; IRONCLAD::KEYS-START -2)
; (DECF IRONCLAD::KEYS-START 4))
; (WHEN (< IRONCLAD::I #) (SETF #) (DECF IRONCLAD::KEYS-START 4)))
; (DECF IRONCLAD::KEYS-START 2)
; (ROTATEF (AREF IRONCLAD::DATA 0) (AREF IRONCLAD::DATA 2))
; (ROTATEF (AREF IRONCLAD::DATA 1) (AREF IRONCLAD::DATA 3))
; (SETF (IRONCLAD:UB32REF/BE IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START)
; (LOGXOR # #))
; (SETF (IRONCLAD:UB32REF/BE IRONCLAD::PLAINTEXT #) (LOGXOR # #))
; (SETF (IRONCLAD:UB32REF/BE IRONCLAD::PLAINTEXT #) (LOGXOR # #))
; ...))
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA IRONCLAD::CAMELLIA-DECRYPT-BLOCK
; (IRONCLAD::CONTEXT IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START
; IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (DECLARE (OPTIMIZE (SPEED 3) (DEBUG 0) (SPACE 0)))
; (DECLARE
; (TYPE IRONCLAD::SIMPLE-OCTET-VECTOR IRONCLAD::CIPHERTEXT
; IRONCLAD::PLAINTEXT)
; (TYPE (INTEGER 0 536870893) IRONCLAD::CIPHERTEXT-START
; IRONCLAD::PLAINTEXT-START))
; (BLOCK IRONCLAD::CAMELLIA-DECRYPT-BLOCK
; (LET* ((IRONCLAD::ROUND-KEYS #)
; (IRONCLAD::GRAND-ROUNDS #)
; (IRONCLAD::KEYS-START #)
; (IRONCLAD::DATA #))
; (DECLARE (TYPE # IRONCLAD::ROUND-KEYS IRONCLAD::DATA)
; (TYPE FIXNUM IRONCLAD::KEYS-START IRONCLAD::GRAND-ROUNDS)
; (DYNAMIC-EXTENT IRONCLAD::DATA))
; (SETF # #
; # #
; # #
; # #)
; (DECF IRONCLAD::KEYS-START 2)
; (DOTIMES (IRONCLAD::I IRONCLAD::GRAND-ROUNDS)
; (DOTIMES # # #)
; (WHEN # # #))
; (DECF IRONCLAD::KEYS-START 2)
; (ROTATEF (AREF IRONCLAD::DATA 0) (AREF IRONCLAD::DATA 2))
; (ROTATEF (AREF IRONCLAD::DATA 1) (AREF IRONCLAD::DATA 3))
; (SETF # #)
; (SETF # #)
; (SETF # #)
; ...)))
;
; note: doing unsigned word to integer coercion (cost 20) to "<return value>"
; processing (DEFCIPHER CAMELLIA ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/ciphers/camellia-tmp9EJA1KN6.fasl
; compilation finished in 0:00:01.444
; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/cast5.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :CRYPTO)
; processing (IN-IRONCLAD-READTABLE)
; processing (DECLAIM (TYPE # ...))
; processing (DEFCONST +CAST5-SBOX0+ ...)
; processing (DEFCONST +CAST5-SBOX1+ ...)
; processing (DEFCONST +CAST5-SBOX2+ ...)
; processing (DEFCONST +CAST5-SBOX3+ ...)
; processing (DEFCONST +CAST5-SBOX4+ ...)
; processing (DEFCONST +CAST5-SBOX5+ ...)
; processing (DEFCONST +CAST5-SBOX6+ ...)
; processing (DEFCONST +CAST5-SBOX7+ ...)
; processing (DEFTYPE CAST5-MASK-VECTOR ...)
; processing (DEFTYPE CAST5-ROTATE-VECTOR ...)
; processing (DEFCLASS CAST5 ...)
; processing (DECLAIM (INLINE CAST5-F1 ...))
; processing (MACROLET (#) ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/cast5.lisp
; in: DEFINE-BLOCK-ENCRYPTOR CAST5
; (IRONCLAD::STORE-WORDS IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START
; IRONCLAD::R0 IRONCLAD::L0)
; --> SETF LET* FUNCALL
; ==>
; 1
;
; note: doing unsigned word to integer coercion (cost 20) from L0 to "<return value>"
; in: DEFINE-BLOCK-DECRYPTOR CAST5
; (IRONCLAD::STORE-WORDS IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START
; IRONCLAD::R0 IRONCLAD::L0)
; --> SETF LET* FUNCALL
; ==>
; 1
;
; note: doing unsigned word to integer coercion (cost 20) from L0 to "<return value>"
; processing (DEFUN GENERATE-CAST5-KEY-SCHEDULE ...)
; processing (DEFMETHOD SCHEDULE-KEY ...)
; processing (DEFCIPHER CAST5 ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/ciphers/cast5-tmp6L8G66PA.fasl
; compilation finished in 0:00:02.264
; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/chacha.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :CRYPTO)
; processing (DECLAIM (TYPE # ...))
; processing (DEFCONST CHACHA-SIGMA ...)
; processing (DEFCONST CHACHA-TAU ...)
; processing (DEFTYPE CHACHA-STATE ...)
; processing (DEFTYPE CHACHA-KEYSTREAM-BUFFER ...)
; processing (DECLAIM (INLINE CHACHA-CORE))
; processing (DEFUN CHACHA-CORE ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/chacha.lisp
; in: DEFUN CHACHA-CORE
; (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 32))
;
; note: could not stack allocate: (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 32))
; (DOTIMES (IRONCLAD::I IRONCLAD::N-ROUNDS)
; (IRONCLAD::QUARTER-ROUND 0 4 8 12)
; (IRONCLAD::QUARTER-ROUND 1 5 9 13)
; (IRONCLAD::QUARTER-ROUND 2 6 10 14)
; (IRONCLAD::QUARTER-ROUND 3 7 11 15)
; (IRONCLAD::QUARTER-ROUND 0 5 10 15)
; (IRONCLAD::QUARTER-ROUND 1 6 11 12)
; (IRONCLAD::QUARTER-ROUND 2 7 8 13)
; (IRONCLAD::QUARTER-ROUND 3 4 9 14))
; --> BLOCK LET TAGBODY UNLESS IF >=
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 32) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; etc.
; --> BLOCK LET TAGBODY PSETQ PROGN SETQ THE 1+
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline fixnum arithmetic (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 1) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 1) . #2#), not a (VALUES FIXNUM &REST T).
; etc.
; processing (DEFUN CHACHA/8-CORE ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/chacha.lisp
; in: DEFUN CHACHA/8-CORE
; (IRONCLAD::CHACHA-CORE 4 IRONCLAD::BUFFER IRONCLAD::STATE)
; --> BLOCK LET MAKE-ARRAY
; ==>
; 1
;
; note: could not stack allocate: (CHACHA-CORE 4 BUFFER STATE)
; processing (DEFUN CHACHA/12-CORE ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/chacha.lisp
; in: DEFUN CHACHA/12-CORE
; (IRONCLAD::CHACHA-CORE 6 IRONCLAD::BUFFER IRONCLAD::STATE)
; --> BLOCK LET MAKE-ARRAY
; ==>
; 1
;
; note: could not stack allocate: (CHACHA-CORE 6 BUFFER STATE)
; processing (DEFUN CHACHA/20-CORE ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/chacha.lisp
; in: DEFUN CHACHA/20-CORE
; (IRONCLAD::CHACHA-CORE 10 IRONCLAD::BUFFER IRONCLAD::STATE)
; --> BLOCK LET MAKE-ARRAY
; ==>
; 1
;
; note: could not stack allocate: (CHACHA-CORE 10 BUFFER STATE)
; processing (DEFCLASS CHACHA ...)
; processing (DEFCLASS CHACHA/12 ...)
; processing (DEFCLASS CHACHA/8 ...)
; processing (DEFUN CHACHA-KEYIFY ...)
; processing (DEFMETHOD SHARED-INITIALIZE ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/chacha.lisp
; in: DEFMETHOD SHARED-INITIALIZE :AFTER (CHACHA T)
; (DEFMETHOD SHARED-INITIALIZE :AFTER
; ((IRONCLAD::CIPHER IRONCLAD:CHACHA) IRONCLAD::SLOT-NAMES
; &REST IRONCLAD::INITARGS
; &KEY (IRONCLAD::KEY NIL IRONCLAD::KEY-P)
; (IRONCLAD::INITIALIZATION-VECTOR NIL IRONCLAD::IV-P)
; &ALLOW-OTHER-KEYS)
; (SETF (IRONCLAD::CHACHA-KEYSTREAM-BUFFER-REMAINING IRONCLAD::CIPHER) 0)
; (WHEN IRONCLAD::INITIALIZATION-VECTOR
; (WHEN (< (LENGTH IRONCLAD::INITIALIZATION-VECTOR) 8)
; (ERROR 'IRONCLAD:INVALID-INITIALIZATION-VECTOR :CIPHER (CLASS-NAME #)
; :BLOCK-LENGTH 8))
; (LET ((IRONCLAD::STATE #))
; (DECLARE (TYPE IRONCLAD::CHACHA-STATE IRONCLAD::STATE))
; (SETF # 0
; # 0
; # #
; # #)))
; IRONCLAD::CIPHER)
; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA (SB-PCL::FAST-METHOD SHARED-INITIALIZE :AFTER
; (IRONCLAD:CHACHA T))
; (SB-PCL::.PV. SB-PCL::.NEXT-METHOD-CALL. IRONCLAD::CIPHER
; IRONCLAD::SLOT-NAMES &REST IRONCLAD::INITARGS &KEY
; (IRONCLAD::KEY NIL IRONCLAD::KEY-P)
; (IRONCLAD::INITIALIZATION-VECTOR NIL IRONCLAD::IV-P) &ALLOW-OTHER-KEYS)
; (DECLARE (IGNORABLE SB-PCL::.PV. SB-PCL::.NEXT-METHOD-CALL.)
; (DISABLE-PACKAGE-LOCKS SB-PCL::PV-ENV-ENVIRONMENT))
; (DECLARE
; (SB-C::CURRENT-DEFMETHOD SHARED-INITIALIZE (:AFTER) (IRONCLAD:CHACHA T)
; (IRONCLAD::CIPHER IRONCLAD::SLOT-NAMES &REST IRONCLAD::INITARGS &KEY
; (IRONCLAD::KEY NIL IRONCLAD::KEY-P)
; (IRONCLAD::INITIALIZATION-VECTOR NIL IRONCLAD::IV-P)
; &ALLOW-OTHER-KEYS)))
; (DECLARE
; (SB-C::SOURCE-FORM
; (LAMBDA
; (IRONCLAD::CIPHER IRONCLAD::SLOT-NAMES
; &REST IRONCLAD::INITARGS
; &KEY # # &ALLOW-OTHER-KEYS)
; (SETF #)
; (WHEN IRONCLAD::INITIALIZATION-VECTOR # #)
; IRONCLAD::CIPHER)))
; (DECLARE (SB-PCL::%PARAMETER IRONCLAD::SLOT-NAMES))
; (DECLARE (SB-PCL::%PARAMETER IRONCLAD::CIPHER))
; (DECLARE (TYPE T IRONCLAD::SLOT-NAMES))
; (DECLARE (IGNORABLE IRONCLAD::SLOT-NAMES IRONCLAD::CIPHER))
; (SYMBOL-MACROLET ((SB-PCL::PV-ENV-ENVIRONMENT SB-PCL::DEFAULT))
; (SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ((IRONCLAD::CIPHER
; IRONCLAD::SLOT-NAMES)
; SB-PCL::.NEXT-METHOD-CALL.
; (IRONCLAD::CIPHER
; IRONCLAD::SLOT-NAMES)
; NIL :CALL-NEXT-METHOD-P NIL
; :SETQ-P NIL :PARAMETERS-SETQD
; NIL :METHOD-CELL
; (#:METHOD-CELL) ...)
; (DECLARE (SB-PCL::%CLASS IRONCLAD::CIPHER IRONCLAD:CHACHA))
; (LOCALLY
; (DECLARE #)
; (SYMBOL-MACROLET #
; #
; #)))))
;
; caught STYLE-WARNING:
; The variable KEY is defined but never used.
;
; caught STYLE-WARNING:
; The variable KEY-P is defined but never used.
;
; caught STYLE-WARNING:
; The variable IV-P is defined but never used.
;
; caught STYLE-WARNING:
; The variable INITARGS is defined but never used.
; processing (DEFMETHOD SCHEDULE-KEY ...)
; processing (DEFINE-STREAM-CRYPTOR CHACHA ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/chacha.lisp
; in: DEFINE-STREAM-CRYPTOR CHACHA
; (ZEROP
; (SETF (AREF IRONCLAD::STATE 12)
; (IRONCLAD::MOD32+ (AREF IRONCLAD::STATE 12) 1)))
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first argument of IF-EQ
; processing (DEFCIPHER CHACHA ...)
; processing (DEFCIPHER CHACHA/12 ...)
; processing (DEFCIPHER CHACHA/8 ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/ciphers/chacha-tmpGNEWTP8D.fasl
; compilation finished in 0:00:02.880
WARNING:
Lisp compilation had style-warnings while
compiling #<CL-SOURCE-FILE "ironclad/cipher/chacha" "chacha">
; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/xchacha.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :CRYPTO)
; processing (DEFCLASS XCHACHA ...)
; processing (DEFCLASS XCHACHA/12 ...)
; processing (DEFCLASS XCHACHA/8 ...)
; processing (DEFMETHOD SHARED-INITIALIZE ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/xchacha.lisp
; in: DEFMETHOD SHARED-INITIALIZE :AFTER (XCHACHA T)
; (DEFMETHOD SHARED-INITIALIZE :AFTER
; ((IRONCLAD::CIPHER IRONCLAD:XCHACHA) IRONCLAD::SLOT-NAMES
; &REST IRONCLAD::INITARGS
; &KEY (IRONCLAD::KEY NIL IRONCLAD::KEY-P)
; (IRONCLAD::INITIALIZATION-VECTOR NIL IRONCLAD::IV-P)
; &ALLOW-OTHER-KEYS)
; (LET ((IRONCLAD::STATE (IRONCLAD::CHACHA-STATE IRONCLAD::CIPHER))
; (IRONCLAD::BUFFER (MAKE-ARRAY 64 :ELEMENT-TYPE '#)))
; (DECLARE (TYPE IRONCLAD::CHACHA-STATE IRONCLAD::STATE)
; (TYPE IRONCLAD::CHACHA-KEYSTREAM-BUFFER IRONCLAD::BUFFER))
; (WHEN IRONCLAD::INITIALIZATION-VECTOR
; (WHEN (< # 24)
; (ERROR 'IRONCLAD:INVALID-INITIALIZATION-VECTOR :CIPHER #
; :BLOCK-LENGTH 24))
; (SETF # #
; # #
; # #
; # #))
; (FUNCALL (IRONCLAD::CHACHA-CORE-FUNCTION IRONCLAD::CIPHER)
; IRONCLAD::BUFFER IRONCLAD::STATE)
; (SETF (AREF IRONCLAD::STATE 4) (IRONCLAD::MOD32- # #)
; (AREF IRONCLAD::STATE 5) (IRONCLAD::MOD32- # #)
; (AREF IRONCLAD::STATE 6) (IRONCLAD::MOD32- # #)
; (AREF IRONCLAD::STATE 7) (IRONCLAD::MOD32- # #)
; (AREF IRONCLAD::STATE 8) (IRONCLAD::MOD32- # #)
; (AREF IRONCLAD::STATE 9) (IRONCLAD::MOD32- # #)
; ...)
; (IF IRONCLAD::INITIALIZATION-VECTOR
; (SETF # #
; # #)
; (SETF # 0
; # 0)))
; IRONCLAD::CIPHER)
; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA (SB-PCL::FAST-METHOD SHARED-INITIALIZE :AFTER
; (IRONCLAD:XCHACHA T))
; (SB-PCL::.PV. SB-PCL::.NEXT-METHOD-CALL. IRONCLAD::CIPHER
; IRONCLAD::SLOT-NAMES &REST IRONCLAD::INITARGS &KEY
; (IRONCLAD::KEY NIL IRONCLAD::KEY-P)
; (IRONCLAD::INITIALIZATION-VECTOR NIL IRONCLAD::IV-P) &ALLOW-OTHER-KEYS)
; (DECLARE (IGNORABLE SB-PCL::.PV. SB-PCL::.NEXT-METHOD-CALL.)
; (DISABLE-PACKAGE-LOCKS SB-PCL::PV-ENV-ENVIRONMENT))
; (DECLARE
; (SB-C::CURRENT-DEFMETHOD SHARED-INITIALIZE (:AFTER) (IRONCLAD:XCHACHA T)
; (IRONCLAD::CIPHER IRONCLAD::SLOT-NAMES &REST IRONCLAD::INITARGS &KEY
; (IRONCLAD::KEY NIL IRONCLAD::KEY-P)
; (IRONCLAD::INITIALIZATION-VECTOR NIL IRONCLAD::IV-P)
; &ALLOW-OTHER-KEYS)))
; (DECLARE
; (SB-C::SOURCE-FORM
; (LAMBDA
; (IRONCLAD::CIPHER IRONCLAD::SLOT-NAMES
; &REST IRONCLAD::INITARGS
; &KEY # # &ALLOW-OTHER-KEYS)
; (LET #
; #
; #
; #
; #
; #)
; IRONCLAD::CIPHER)))
; (DECLARE (SB-PCL::%PARAMETER IRONCLAD::SLOT-NAMES))
; (DECLARE (SB-PCL::%PARAMETER IRONCLAD::CIPHER))
; (DECLARE (TYPE T IRONCLAD::SLOT-NAMES))
; (DECLARE (IGNORABLE IRONCLAD::SLOT-NAMES IRONCLAD::CIPHER))
; (SYMBOL-MACROLET ((SB-PCL::PV-ENV-ENVIRONMENT SB-PCL::DEFAULT))
; (SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ((IRONCLAD::CIPHER
; IRONCLAD::SLOT-NAMES)
; SB-PCL::.NEXT-METHOD-CALL.
; (IRONCLAD::CIPHER
; IRONCLAD::SLOT-NAMES)
; NIL :CALL-NEXT-METHOD-P NIL
; :SETQ-P NIL :PARAMETERS-SETQD
; NIL :METHOD-CELL
; (#:METHOD-CELL) ...)
; (DECLARE (SB-PCL::%CLASS IRONCLAD::CIPHER IRONCLAD:XCHACHA))
; (LOCALLY
; (DECLARE #)
; (SYMBOL-MACROLET #
; #
; #)))))
;
; caught STYLE-WARNING:
; The variable KEY is defined but never used.
;
; caught STYLE-WARNING:
; The variable KEY-P is defined but never used.
;
; caught STYLE-WARNING:
; The variable IV-P is defined but never used.
;
; caught STYLE-WARNING:
; The variable INITARGS is defined but never used.
; processing (DEFCIPHER XCHACHA ...)
; processing (DEFCIPHER XCHACHA/12 ...)
; processing (DEFCIPHER XCHACHA/8 ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/ciphers/xchacha-tmpHW2JNYJ8.fasl
; compilation finished in 0:00:00.228
WARNING:
Lisp compilation had style-warnings while
compiling #<CL-SOURCE-FILE "ironclad/cipher/xchacha" "xchacha">
; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/des.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :CRYPTO)
; processing (IN-IRONCLAD-READTABLE)
; processing (DECLAIM (TYPE # ...))
; processing (DEFCONST DES-SBOX0 ...)
; processing (DEFCONST DES-SBOX1 ...)
; processing (DEFCONST DES-SBOX2 ...)
; processing (DEFCONST DES-SBOX3 ...)
; processing (DEFCONST DES-SBOX4 ...)
; processing (DEFCONST DES-SBOX5 ...)
; processing (DEFCONST DES-SBOX6 ...)
; processing (DEFCONST DES-SBOX7 ...)
; processing (DEFCONST PERMUTATION1 ...)
; processing (DEFCONST TOTAL-ROTATIONS ...)
; processing (DEFCONST PERMUTATION2 ...)
; processing (DEFTYPE DES-ROUND-KEYS ...)
; processing (MACROLET (# # ...) ...)
; processing (DEFCLASS DES ...)
; processing (DEFINE-BLOCK-ENCRYPTOR DES ...)
; processing (DEFINE-BLOCK-DECRYPTOR DES ...)
; processing (DEFCLASS 3DES ...)
; processing (DEFINE-BLOCK-ENCRYPTOR 3DES ...)
; processing (DEFINE-BLOCK-DECRYPTOR 3DES ...)
; processing (DEFUN DES-COOK-KEY-SCHEDULE ...)
; processing (DEFUN COMPUTE-DES-ENCRYPTION-KEYS ...)
; processing (DEFUN COMPUTE-ROUND-KEYS-FOR-DES-KEY ...)
; processing (DEFMETHOD SCHEDULE-KEY ...)
; processing (DEFMETHOD SCHEDULE-KEY ...)
; processing (DEFCIPHER DES ...)
; processing (DEFCIPHER 3DES ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/ciphers/des-tmpNT01KZP7.fasl
; compilation finished in 0:00:00.876
; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/idea.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :CRYPTO)
; processing (DEFUN IDEA-MUL ...)
; processing (DEFUN IDEA-MUL-INV ...)
; processing (DEFTYPE IDEA-ROUND-KEYS ...)
; processing (DEFUN IDEA-MUNGE-BLOCK ...)
; processing (DEFCLASS IDEA ...)
; processing (DEFINE-BLOCK-ENCRYPTOR IDEA ...)
; processing (DEFINE-BLOCK-DECRYPTOR IDEA ...)
; processing (DEFUN IDEA-INVERT-KEY ...)
; processing (DEFUN IDEA-KEY-SCHEDULE ...)
; processing (DEFMETHOD SCHEDULE-KEY ...)
; processing (DEFCIPHER IDEA ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.1.11.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/ciphers/idea-tmpSI3EGGWW.fasl
; compilation finished in 0:00:00.452
; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp" (written 12 SEP 2021 08:27:41 AM):
; processing (IN-PACKAGE :CRYPTO)
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...)
; processing (DECLAIM (TYPE # ...) ...)
; processing (DECLAIM (INLINE KALYNA-MAKE-ODD-KEY))
; processing (DEFUN KALYNA-MAKE-ODD-KEY ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp
; in: DEFUN KALYNA-MAKE-ODD-KEY
; (IRONCLAD::M 0 1 8 0 -56)
; --> LET* LOGIOR IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) 8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 4722366482869645213441) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 4722366482869645213441) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; --> LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) 8)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 0 8 1 -56)
; --> LET* LOGIOR IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) 8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 4722366482869645213441) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 4722366482869645213441) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; --> LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) 8)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 3 40 2 -24)
; --> LET* LOGIOR IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 3)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 2)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 3)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 2)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 4 40 3 -24)
; --> LET* LOGIOR IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 4)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 3)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 4)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 3)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 5 40 4 -24)
; --> LET* LOGIOR IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 5)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 4)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 5)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 4)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 6 40 5 -24)
; --> LET* LOGIOR IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 6)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 5)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 6)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 5)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 7 40 6 -24)
; --> LET* LOGIOR IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 7)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 6)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 7)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 6)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 0 40 7 -24)
; --> LET* LOGIOR IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 7)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 7)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 1 40 0 -24)
; --> LET* LOGIOR IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 2 40 1 -24)
; --> LET* LOGIOR IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 2)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 2)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 2 40 1 -24)
; --> LET* LOGIOR IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 2)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 2)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 3 40 2 -24)
; --> LET* LOGIOR IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 3)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 2)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 3)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 2)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 0 40 3 -24)
; --> LET* LOGIOR IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 3)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 3)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 1 40 0 -24)
; --> LET* LOGIOR IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; processing (DECLAIM (INLINE KALYNA-SWAP-BLOCKS))
; processing (DEFUN KALYNA-SWAP-BLOCKS ...)
; processing (DEFMACRO KALYNA-ADD-KEY ...)
; processing (DEFMACRO KALYNA-SUB-KEY ...)
; processing (DEFMACRO KALYNA-ADD-CONSTANT ...)
; processing (DECLAIM (INLINE KALYNA-G0128))
; processing (DEFUN KALYNA-G0128 ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp
; in: DEFUN KALYNA-G0128
; (IRONCLAD::M 0 0 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 0 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 0 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 0 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 1 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 1 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 1 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 1 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 1 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 1 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 1 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 1 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 0 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 0 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 0 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 0 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; processing (DECLAIM (INLINE KALYNA-GL128))
; processing (DEFUN KALYNA-GL128 ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp
; in: DEFUN KALYNA-GL128
; (IRONCLAD::MOD64+ (AREF IRONCLAD::K (+ IRONCLAD::K-START 0))
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 0 -8)
; (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 1 -56)))
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::MOD64+ (AREF IRONCLAD::K (+ IRONCLAD::K-START 1))
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 1 -8)
; (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 0 -56)))
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::M 0 0 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 0 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 0 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 0 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 1 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 1 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 1 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 1 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::MOD64+ (AREF IRONCLAD::K (+ IRONCLAD::K-START 0))
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 0 -8)
; (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 1 -56)))
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 1 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 1 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 1 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 1 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 0 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 0 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 0 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 0 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::MOD64+ (AREF IRONCLAD::K (+ IRONCLAD::K-START 1))
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 1 -8)
; (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 0 -56)))
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; processing (DECLAIM (INLINE KALYNA-IMC128))
; processing (DEFUN KALYNA-IMC128 ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp
; in: DEFUN KALYNA-IMC128
; (IRONCLAD::M 0 0 0 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 1 0 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 1 0 -8) (IRONCLAD::M 2 2 0 -16)
; (IRONCLAD::M 3 3 0 -24) (IRONCLAD::M 4 0 0 -32)
; (IRONCLAD::M 5 1 0 -40) (IRONCLAD::M 6 2 0 -48)
; (IRONCLAD::M 7 3 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 2 0 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 1 0 -8) (IRONCLAD::M 2 2 0 -16)
; (IRONCLAD::M 3 3 0 -24) (IRONCLAD::M 4 0 0 -32)
; (IRONCLAD::M 5 1 0 -40) (IRONCLAD::M 6 2 0 -48)
; (IRONCLAD::M 7 3 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 3 0 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 1 0 -8) (IRONCLAD::M 2 2 0 -16)
; (IRONCLAD::M 3 3 0 -24) (IRONCLAD::M 4 0 0 -32)
; (IRONCLAD::M 5 1 0 -40) (IRONCLAD::M 6 2 0 -48)
; (IRONCLAD::M 7 3 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 0 0 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 1 0 -8) (IRONCLAD::M 2 2 0 -16)
; (IRONCLAD::M 3 3 0 -24) (IRONCLAD::M 4 0 0 -32)
; (IRONCLAD::M 5 1 0 -40) (IRONCLAD::M 6 2 0 -48)
; (IRONCLAD::M 7 3 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 1 0 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 1 0 -8) (IRONCLAD::M 2 2 0 -16)
; (IRONCLAD::M 3 3 0 -24) (IRONCLAD::M 4 0 0 -32)
; (IRONCLAD::M 5 1 0 -40) (IRONCLAD::M 6 2 0 -48)
; (IRONCLAD::M 7 3 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 2 0 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 1 0 -8) (IRONCLAD::M 2 2 0 -16)
; (IRONCLAD::M 3 3 0 -24) (IRONCLAD::M 4 0 0 -32)
; (IRONCLAD::M 5 1 0 -40) (IRONCLAD::M 6 2 0 -48)
; (IRONCLAD::M 7 3 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 3 0 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 1 0 -8) (IRONCLAD::M 2 2 0 -16)
; (IRONCLAD::M 3 3 0 -24) (IRONCLAD::M 4 0 0 -32)
; (IRONCLAD::M 5 1 0 -40) (IRONCLAD::M 6 2 0 -48)
; (IRONCLAD::M 7 3 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 0 1 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 1 1 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 1 0) (IRONCLAD::M 1 1 1 -8) (IRONCLAD::M 2 2 1 -16)
; (IRONCLAD::M 3 3 1 -24) (IRONCLAD::M 4 0 1 -32)
; (IRONCLAD::M 5 1 1 -40) (IRONCLAD::M 6 2 1 -48)
; (IRONCLAD::M 7 3 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 2 1 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 1 0) (IRONCLAD::M 1 1 1 -8) (IRONCLAD::M 2 2 1 -16)
; (IRONCLAD::M 3 3 1 -24) (IRONCLAD::M 4 0 1 -32)
; (IRONCLAD::M 5 1 1 -40) (IRONCLAD::M 6 2 1 -48)
; (IRONCLAD::M 7 3 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 3 1 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 1 0) (IRONCLAD::M 1 1 1 -8) (IRONCLAD::M 2 2 1 -16)
; (IRONCLAD::M 3 3 1 -24) (IRONCLAD::M 4 0 1 -32)
; (IRONCLAD::M 5 1 1 -40) (IRONCLAD::M 6 2 1 -48)
; (IRONCLAD::M 7 3 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 0 1 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 1 0) (IRONCLAD::M 1 1 1 -8) (IRONCLAD::M 2 2 1 -16)
; (IRONCLAD::M 3 3 1 -24) (IRONCLAD::M 4 0 1 -32)
; (IRONCLAD::M 5 1 1 -40) (IRONCLAD::M 6 2 1 -48)
; (IRONCLAD::M 7 3 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 1 1 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 1 0) (IRONCLAD::M 1 1 1 -8) (IRONCLAD::M 2 2 1 -16)
; (IRONCLAD::M 3 3 1 -24) (IRONCLAD::M 4 0 1 -32)
; (IRONCLAD::M 5 1 1 -40) (IRONCLAD::M 6 2 1 -48)
; (IRONCLAD::M 7 3 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 2 1 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 1 0) (IRONCLAD::M 1 1 1 -8) (IRONCLAD::M 2 2 1 -16)
; (IRONCLAD::M 3 3 1 -24) (IRONCLAD::M 4 0 1 -32)
; (IRONCLAD::M 5 1 1 -40) (IRONCLAD::M 6 2 1 -48)
; (IRONCLAD::M 7 3 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 3 1 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 1 0) (IRONCLAD::M 1 1 1 -8) (IRONCLAD::M 2 2 1 -16)
; (IRONCLAD::M 3 3 1 -24) (IRONCLAD::M 4 0 1 -32)
; (IRONCLAD::M 5 1 1 -40) (IRONCLAD::M 6 2 1 -48)
; (IRONCLAD::M 7 3 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; processing (DECLAIM (INLINE KALYNA-IG128))
; processing (DEFUN KALYNA-IG128 ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp
; in: DEFUN KALYNA-IG128
; (IRONCLAD::M 0 0 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 0 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 0 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 0 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 1 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 1 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 1 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 1 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 1 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 1 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 1 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 1 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 0 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 0 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 0 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 0 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; processing (DECLAIM (INLINE KALYNA-IGL128))
; processing (DEFUN KALYNA-IGL128 ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp
; in: DEFUN KALYNA-IGL128
; (IRONCLAD::MOD64-
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 0 -8 8)
; (IRONCLAD::M 2 0 -16 16) (IRONCLAD::M 3 0 -24 24)
; (IRONCLAD::M 0 1 -32 32) (IRONCLAD::M 1 1 -40 40)
; (IRONCLAD::M 2 1 -48 48) (IRONCLAD::M 3 1 -56 56))
; (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)))
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::MOD64-
; (LOGXOR (IRONCLAD::M 0 1 0 0) (IRONCLAD::M 1 1 -8 8)
; (IRONCLAD::M 2 1 -16 16) (IRONCLAD::M 3 1 -24 24)
; (IRONCLAD::M 0 0 -32 32) (IRONCLAD::M 1 0 -40 40)
; (IRONCLAD::M 2 0 -48 48) (IRONCLAD::M 3 0 -56 56))
; (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)))
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::M 0 0 0 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 0 -8 8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 2 0 -16 16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 3 0 -24 24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 0 1 -32 32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 1095216660481) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 1095216660481) . #2#), not a (VALUES FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 0 -8 8) (IRONCLAD::M 2 0 -16 16)
; (IRONCLAD::M 3 0 -24 24) (IRONCLAD::M 0 1 -32 32)
; (IRONCLAD::M 1 1 -40 40) (IRONCLAD::M 2 1 -48 48)
; (IRONCLAD::M 3 1 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
; The second argument is a (MOD 1095216660481), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The second argument is a (MOD 1095216660481), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 1 -40 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 280375465082881) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 280375465082881) . #2#), not a (VALUES
; FIXNUM &REST
; T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 0 -8 8) (IRONCLAD::M 2 0 -16 16)
; (IRONCLAD::M 3 0 -24 24) (IRONCLAD::M 0 1 -32 32)
; (IRONCLAD::M 1 1 -40 40) (IRONCLAD::M 2 1 -48 48)
; (IRONCLAD::M 3 1 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The second argument is a (MOD 280375465082881), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 280375465082881), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 1 -48 48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 71776119061217281) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 71776119061217281) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 0 -8 8) (IRONCLAD::M 2 0 -16 16)
; (IRONCLAD::M 3 0 -24 24) (IRONCLAD::M 0 1 -32 32)
; (IRONCLAD::M 1 1 -40 40) (IRONCLAD::M 2 1 -48 48)
; (IRONCLAD::M 3 1 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; The second argument is a (MOD 71776119061217281), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 71776119061217281), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 1 -56 56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 0 -8 8) (IRONCLAD::M 2 0 -16 16)
; (IRONCLAD::M 3 0 -24 24) (IRONCLAD::M 0 1 -32 32)
; (IRONCLAD::M 1 1 -40 40) (IRONCLAD::M 2 1 -48 48)
; (IRONCLAD::M 3 1 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; The second argument is a (MOD 18374686479671623681), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 18374686479671623681), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::MOD64-
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 0 -8 8)
; (IRONCLAD::M 2 0 -16 16) (IRONCLAD::M 3 0 -24 24)
; (IRONCLAD::M 0 1 -32 32) (IRONCLAD::M 1 1 -40 40)
; (IRONCLAD::M 2 1 -48 48) (IRONCLAD::M 3 1 -56 56))
; (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)))
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1#), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
; etc.
; (IRONCLAD::M 0 1 0 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 1 -8 8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 2 1 -16 16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 3 1 -24 24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 0 0 -32 32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 1095216660481) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 1095216660481) . #2#), not a (VALUES FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0 0) (IRONCLAD::M 1 1 -8 8) (IRONCLAD::M 2 1 -16 16)
; (IRONCLAD::M 3 1 -24 24) (IRONCLAD::M 0 0 -32 32)
; (IRONCLAD::M 1 0 -40 40) (IRONCLAD::M 2 0 -48 48)
; (IRONCLAD::M 3 0 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
; The second argument is a (MOD 1095216660481), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The second argument is a (MOD 1095216660481), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 0 -40 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 280375465082881) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 280375465082881) . #2#), not a (VALUES
; FIXNUM &REST
; T).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0 0) (IRONCLAD::M 1 1 -8 8) (IRONCLAD::M 2 1 -16 16)
; (IRONCLAD::M 3 1 -24 24) (IRONCLAD::M 0 0 -32 32)
; (IRONCLAD::M 1 0 -40 40) (IRONCLAD::M 2 0 -48 48)
; (IRONCLAD::M 3 0 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The second argument is a (MOD 280375465082881), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 280375465082881), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 0 -48 48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 71776119061217281) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 71776119061217281) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0 0) (IRONCLAD::M 1 1 -8 8) (IRONCLAD::M 2 1 -16 16)
; (IRONCLAD::M 3 1 -24 24) (IRONCLAD::M 0 0 -32 32)
; (IRONCLAD::M 1 0 -40 40) (IRONCLAD::M 2 0 -48 48)
; (IRONCLAD::M 3 0 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; The second argument is a (MOD 71776119061217281), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 71776119061217281), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 0 -56 56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0 0) (IRONCLAD::M 1 1 -8 8) (IRONCLAD::M 2 1 -16 16)
; (IRONCLAD::M 3 1 -24 24) (IRONCLAD::M 0 0 -32 32)
; (IRONCLAD::M 1 0 -40 40) (IRONCLAD::M 2 0 -48 48)
; (IRONCLAD::M 3 0 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; The second argument is a (MOD 18374686479671623681), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 18374686479671623681), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::MOD64-
; (LOGXOR (IRONCLAD::M 0 1 0 0) (IRONCLAD::M 1 1 -8 8)
; (IRONCLAD::M 2 1 -16 16) (IRONCLAD::M 3 1 -24 24)
; (IRONCLAD::M 0 0 -32 32) (IRONCLAD::M 1 0 -40 40)
; (IRONCLAD::M 2 0 -48 48) (IRONCLAD::M 3 0 -56 56))
; (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)))
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1#), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 0 -8 8) (IRONCLAD::M 2 0 -16 16)
; (IRONCLAD::M 3 0 -24 24) (IRONCLAD::M 0 1 -32 32)
; (IRONCLAD::M 1 1 -40 40) (IRONCLAD::M 2 1 -48 48)
; (IRONCLAD::M 3 1 -56 56))
;
; note: doing unsigned word to integer coercion (cost 20)
; (LOGXOR (IRONCLAD::M 0 1 0 0) (IRONCLAD::M 1 1 -8 8) (IRONCLAD::M 2 1 -16 16)
; (IRONCLAD::M 3 1 -24 24) (IRONCLAD::M 0 0 -32 32)
; (IRONCLAD::M 1 0 -40 40) (IRONCLAD::M 2 0 -48 48)
; (IRONCLAD::M 3 0 -56 56))
;
; note: doing unsigned word to integer coercion (cost 20)
; processing (DECLAIM (INLINE KALYNA-G128))
; processing (DEFUN KALYNA-G128 ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp
; in: DEFUN KALYNA-G128
; (IRONCLAD::M 0 0 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 0 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 0 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 0 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 1 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 1 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 1 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 1 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 1 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 1 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 1 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 1 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 0 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 0 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 0 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 0 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; processing (DEFCLASS KALYNA128 ...)
; processing (DEFMETHOD SCHEDULE-KEY ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp
; in: DEFMETHOD SCHEDULE-KEY (KALYNA128 T)
; (IRONCLAD::KALYNA-GL128 IRONCLAD::T1 IRONCLAD::ENCRYPTION-ROUND-KEYS 28
; IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::KALYNA-GL128 IRONCLAD::T1 IRONCLAD::ENCRYPTION-ROUND-KEYS 20
; IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::KALYNA-GL128 IRONCLAD::T1 IRONCLAD::T2 0 IRONCLAD::KA 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::KALYNA-GL128 IRONCLAD::T1 IRONCLAD::ENCRYPTION-ROUND-KEYS 0
; IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::KALYNA-GL128 IRONCLAD::T1 IRONCLAD::ENCRYPTION-ROUND-KEYS
; IRONCLAD::N IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::KALYNA-GL128 IRONCLAD::T1 IRONCLAD::ENCRYPTION-ROUND-KEYS 0
; IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::KALYNA-GL128 IRONCLAD::T1 IRONCLAD::T2 0 IRONCLAD::KEY 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::KALYNA-GL128 IRONCLAD::T1 IRONCLAD::ENCRYPTION-ROUND-KEYS
; IRONCLAD::N IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::KALYNA-G128 IRONCLAD::T2 IRONCLAD::T1 IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-GL128 IRONCLAD::T1 IRONCLAD::ENCRYPTION-ROUND-KEYS
; IRONCLAD::N IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-MAKE-ODD-KEY 2 IRONCLAD::ENCRYPTION-ROUND-KEYS IRONCLAD::N
; IRONCLAD::ENCRYPTION-ROUND-KEYS (+ IRONCLAD::N 2))
; --> BLOCK MACROLET ECASE LET COND IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) 8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 4722366482869645213441) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 4722366482869645213441) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) 8)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) 8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 4722366482869645213441) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 4722366482869645213441) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) 8)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G128 IRONCLAD::T2 IRONCLAD::T1 IRONCLAD::KEY 0)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-GL128 IRONCLAD::T1 IRONCLAD::T2 0 IRONCLAD::KEY 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G0128 IRONCLAD::T2 IRONCLAD::KS)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G128 IRONCLAD::T2 IRONCLAD::T1 IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-GL128 IRONCLAD::T1 IRONCLAD::ENCRYPTION-ROUND-KEYS 0
; IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-MAKE-ODD-KEY 2 IRONCLAD::ENCRYPTION-ROUND-KEYS 0
; IRONCLAD::ENCRYPTION-ROUND-KEYS 2)
; --> BLOCK MACROLET ECASE LET COND IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) 8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 4722366482869645213441) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 4722366482869645213441) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) 8)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) 8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 4722366482869645213441) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 4722366482869645213441) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) 8)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G128 IRONCLAD::T2 IRONCLAD::T1 IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-GL128 IRONCLAD::T1 IRONCLAD::ENCRYPTION-ROUND-KEYS 20
; IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IMC128 IRONCLAD::DECRYPTION-ROUND-KEYS IRONCLAD::N)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G128 IRONCLAD::T2 IRONCLAD::T1 IRONCLAD::KO 0)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-GL128 IRONCLAD::T1 IRONCLAD::T2 0 IRONCLAD::KA 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G0128 IRONCLAD::T2 IRONCLAD::KS)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G128 IRONCLAD::T2 IRONCLAD::T1 IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-GL128 IRONCLAD::T1 IRONCLAD::ENCRYPTION-ROUND-KEYS 0
; IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-MAKE-ODD-KEY 2 IRONCLAD::ENCRYPTION-ROUND-KEYS 0
; IRONCLAD::ENCRYPTION-ROUND-KEYS 2)
; --> BLOCK MACROLET ECASE LET COND IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) 8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 4722366482869645213441) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 4722366482869645213441) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) 8)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) 8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 4722366482869645213441) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 4722366482869645213441) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) 8)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G128 IRONCLAD::T2 IRONCLAD::T1 IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-GL128 IRONCLAD::T1 IRONCLAD::ENCRYPTION-ROUND-KEYS 28
; IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IMC128 IRONCLAD::DECRYPTION-ROUND-KEYS IRONCLAD::N)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G128 IRONCLAD::T2 IRONCLAD::T1 IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-GL128 IRONCLAD::T1 IRONCLAD::ENCRYPTION-ROUND-KEYS
; IRONCLAD::N IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-MAKE-ODD-KEY 2 IRONCLAD::ENCRYPTION-ROUND-KEYS IRONCLAD::N
; IRONCLAD::ENCRYPTION-ROUND-KEYS (+ IRONCLAD::N 2))
; --> BLOCK MACROLET ECASE LET COND IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) 8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 4722366482869645213441) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 4722366482869645213441) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) 8)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) 8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 4722366482869645213441) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 4722366482869645213441) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) 8)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; processing (DEFINE-BLOCK-ENCRYPTOR KALYNA128 ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp
; in: DEFINE-BLOCK-ENCRYPTOR KALYNA128
; (IRONCLAD::KALYNA-ADD-KEY 2 IRONCLAD::T2 0 IRONCLAD::T1
; IRONCLAD::ENCRYPTION-ROUND-KEYS)
; --> PROGN SYMBOL-MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::KALYNA-GL128 IRONCLAD::T2 IRONCLAD::T1 0
; IRONCLAD::ENCRYPTION-ROUND-KEYS 28)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START)
; --> BLOCK DPB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT (+ IRONCLAD::PLAINTEXT-START 8))
; --> BLOCK DPB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; (IRONCLAD::KALYNA-GL128 IRONCLAD::T2 IRONCLAD::T1 0
; IRONCLAD::ENCRYPTION-ROUND-KEYS 20)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::KALYNA-ADD-KEY 2 IRONCLAD::T2 0 IRONCLAD::T1
; IRONCLAD::ENCRYPTION-ROUND-KEYS)
; --> PROGN SYMBOL-MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 36893488147419103231) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (MOD 36893488147419103231) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 36893488147419103231) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (MOD 36893488147419103231) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G128 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::ENCRYPTION-ROUND-KEYS 2)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G128 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::ENCRYPTION-ROUND-KEYS 4)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G128 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::ENCRYPTION-ROUND-KEYS 6)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G128 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::ENCRYPTION-ROUND-KEYS 8)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G128 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::ENCRYPTION-ROUND-KEYS 10)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G128 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::ENCRYPTION-ROUND-KEYS 12)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G128 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::ENCRYPTION-ROUND-KEYS 14)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G128 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::ENCRYPTION-ROUND-KEYS 16)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G128 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::ENCRYPTION-ROUND-KEYS 18)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G128 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::ENCRYPTION-ROUND-KEYS 20)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G128 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::ENCRYPTION-ROUND-KEYS 22)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G128 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::ENCRYPTION-ROUND-KEYS 24)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G128 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::ENCRYPTION-ROUND-KEYS 26)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-GL128 IRONCLAD::T2 IRONCLAD::T1 0
; IRONCLAD::ENCRYPTION-ROUND-KEYS 28)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-GL128 IRONCLAD::T2 IRONCLAD::T1 0
; IRONCLAD::ENCRYPTION-ROUND-KEYS 20)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (AREF IRONCLAD::T1 0)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
; (SETF (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START)
; (AREF IRONCLAD::T1 0)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT
; (+ IRONCLAD::CIPHERTEXT-START 8))
; (AREF IRONCLAD::T1 1))
; --> SETF LET* FUNCALL
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (AREF IRONCLAD::T1 1)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
; (SETF (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START)
; (AREF IRONCLAD::T1 0)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT
; (+ IRONCLAD::CIPHERTEXT-START 8))
; (AREF IRONCLAD::T1 1))
; --> SETF LET* FUNCALL
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START)
; --> BLOCK DPB
; ==>
; 1
;
; note: doing unsigned word to integer coercion (cost 20)
;
; note: doing unsigned word to integer coercion (cost 20)
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT (+ IRONCLAD::PLAINTEXT-START 8))
; --> BLOCK DPB
; ==>
; 1
;
; note: doing unsigned word to integer coercion (cost 20)
;
; note: doing unsigned word to integer coercion (cost 20)
; processing (DEFINE-BLOCK-DECRYPTOR KALYNA128 ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp
; in: DEFINE-BLOCK-DECRYPTOR KALYNA128
; (IRONCLAD::KALYNA-SUB-KEY 2 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::DECRYPTION-ROUND-KEYS 20)
; --> PROGN SYMBOL-MACROLET SETF LET* IRONCLAD::MOD64- LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::KALYNA-SUB-KEY 2 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::DECRYPTION-ROUND-KEYS 28)
; --> PROGN SYMBOL-MACROLET SETF LET* IRONCLAD::MOD64- LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::KALYNA-IGL128 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::DECRYPTION-ROUND-KEYS 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64- LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START)
; --> BLOCK DPB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT (+ IRONCLAD::CIPHERTEXT-START 8))
; --> BLOCK DPB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; (IRONCLAD::KALYNA-SUB-KEY 2 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::DECRYPTION-ROUND-KEYS 28)
; --> PROGN SYMBOL-MACROLET SETF LET* IRONCLAD::MOD64- LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1#), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1#), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
; etc.
; (IRONCLAD::KALYNA-IMC128 IRONCLAD::T1 0)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IG128 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::DECRYPTION-ROUND-KEYS 26)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IG128 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::DECRYPTION-ROUND-KEYS 24)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IG128 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::DECRYPTION-ROUND-KEYS 22)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IG128 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::DECRYPTION-ROUND-KEYS 20)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-SUB-KEY 2 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::DECRYPTION-ROUND-KEYS 20)
; --> PROGN SYMBOL-MACROLET SETF LET* IRONCLAD::MOD64- LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1#), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1#), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
; etc.
; (IRONCLAD::KALYNA-IMC128 IRONCLAD::T1 0)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IG128 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::DECRYPTION-ROUND-KEYS 18)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IG128 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::DECRYPTION-ROUND-KEYS 16)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IG128 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::DECRYPTION-ROUND-KEYS 14)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IG128 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::DECRYPTION-ROUND-KEYS 12)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IG128 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::DECRYPTION-ROUND-KEYS 10)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IG128 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::DECRYPTION-ROUND-KEYS 8)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IG128 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::DECRYPTION-ROUND-KEYS 6)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IG128 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::DECRYPTION-ROUND-KEYS 4)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IG128 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::DECRYPTION-ROUND-KEYS 2)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IGL128 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::DECRYPTION-ROUND-KEYS 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64- LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 1095216660481) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 1095216660481) . #2#), not a (VALUES FIXNUM
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
; The second argument is a (MOD 1095216660481), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The second argument is a (MOD 1095216660481), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 280375465082881) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 280375465082881) . #2#), not a (VALUES
; FIXNUM &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The second argument is a (MOD 280375465082881), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 280375465082881), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 71776119061217281) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 71776119061217281) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; The second argument is a (MOD 71776119061217281), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 71776119061217281), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; The second argument is a (MOD 18374686479671623681), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 18374686479671623681), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1#), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 1095216660481) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 1095216660481) . #2#), not a (VALUES FIXNUM
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
; The second argument is a (MOD 1095216660481), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The second argument is a (MOD 1095216660481), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 280375465082881) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 280375465082881) . #2#), not a (VALUES
; FIXNUM &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The second argument is a (MOD 280375465082881), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 280375465082881), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 71776119061217281) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 71776119061217281) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; The second argument is a (MOD 71776119061217281), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 71776119061217281), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; The second argument is a (MOD 18374686479671623681), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 18374686479671623681), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1#), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
; etc.
; (AREF IRONCLAD::T1 0)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
; (SETF (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START)
; (AREF IRONCLAD::T1 0)
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT
; (+ IRONCLAD::PLAINTEXT-START 8))
; (AREF IRONCLAD::T1 1))
; --> SETF LET* FUNCALL
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (AREF IRONCLAD::T1 1)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
; (SETF (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START)
; (AREF IRONCLAD::T1 0)
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT
; (+ IRONCLAD::PLAINTEXT-START 8))
; (AREF IRONCLAD::T1 1))
; --> SETF LET* FUNCALL
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START)
; --> BLOCK DPB
; ==>
; 1
;
; note: doing unsigned word to integer coercion (cost 20)
;
; note: doing unsigned word to integer coercion (cost 20)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT (+ IRONCLAD::CIPHERTEXT-START 8))
; --> BLOCK DPB
; ==>
; 1
;
; note: doing unsigned word to integer coercion (cost 20)
;
; note: doing unsigned word to integer coercion (cost 20)
; (IRONCLAD::KALYNA-IGL128 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::DECRYPTION-ROUND-KEYS 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64- LDB
; ==>
; 1
;
; note: doing unsigned word to integer coercion (cost 20)
;
; note: doing unsigned word to integer coercion (cost 20)
; processing (DEFCIPHER KALYNA128 ...)
; processing (DECLAIM (INLINE KALYNA-G0256))
; processing (DEFUN KALYNA-G0256 ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp
; in: DEFUN KALYNA-G0256
; (IRONCLAD::M 0 0 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 0 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 3 -16)
; (IRONCLAD::M 3 3 -24) (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 2 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 3 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 3 -16)
; (IRONCLAD::M 3 3 -24) (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 2 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 3 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 3 -16)
; (IRONCLAD::M 3 3 -24) (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 2 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 2 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 3 -16)
; (IRONCLAD::M 3 3 -24) (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 2 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 2 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 3 -16)
; (IRONCLAD::M 3 3 -24) (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 2 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 1 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 3 -16)
; (IRONCLAD::M 3 3 -24) (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 2 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 1 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 3 -16)
; (IRONCLAD::M 3 3 -24) (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 2 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 1 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 1 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 3 -40)
; (IRONCLAD::M 6 2 -48) (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 0 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 3 -40)
; (IRONCLAD::M 6 2 -48) (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 0 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 3 -40)
; (IRONCLAD::M 6 2 -48) (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 3 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 3 -40)
; (IRONCLAD::M 6 2 -48) (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 3 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 3 -40)
; (IRONCLAD::M 6 2 -48) (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 2 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 3 -40)
; (IRONCLAD::M 6 2 -48) (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 2 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 3 -40)
; (IRONCLAD::M 6 2 -48) (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 2 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 2 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0) (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 3 -48) (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 1 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0) (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 3 -48) (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 1 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0) (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 3 -48) (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 0 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0) (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 3 -48) (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 0 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0) (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 3 -48) (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 3 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0) (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 3 -48) (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 3 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0) (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 3 -48) (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 3 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 3 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0) (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16)
; (IRONCLAD::M 3 2 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 2 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0) (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16)
; (IRONCLAD::M 3 2 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 2 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0) (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16)
; (IRONCLAD::M 3 2 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 1 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0) (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16)
; (IRONCLAD::M 3 2 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 1 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0) (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16)
; (IRONCLAD::M 3 2 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 0 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0) (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16)
; (IRONCLAD::M 3 2 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 0 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0) (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16)
; (IRONCLAD::M 3 2 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; processing (DECLAIM (INLINE KALYNA-GL256))
; processing (DEFUN KALYNA-GL256 ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp
; in: DEFUN KALYNA-GL256
; (IRONCLAD::MOD64+ (AREF IRONCLAD::K (+ IRONCLAD::K-START 0))
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 0 -8)
; (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 2 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 1 -56)))
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::MOD64+ (AREF IRONCLAD::K (+ IRONCLAD::K-START 1))
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 1 -8)
; (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 3 -40)
; (IRONCLAD::M 6 2 -48) (IRONCLAD::M 7 2 -56)))
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::MOD64+ (AREF IRONCLAD::K (+ IRONCLAD::K-START 2))
; (LOGXOR (IRONCLAD::M 0 2 0) (IRONCLAD::M 1 2 -8)
; (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 3 -48) (IRONCLAD::M 7 3 -56)))
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::MOD64+ (AREF IRONCLAD::K (+ IRONCLAD::K-START 3))
; (LOGXOR (IRONCLAD::M 0 3 0) (IRONCLAD::M 1 3 -8)
; (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 0 -56)))
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::M 0 0 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 0 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 3 -16)
; (IRONCLAD::M 3 3 -24) (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 2 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 3 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 3 -16)
; (IRONCLAD::M 3 3 -24) (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 2 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 3 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 3 -16)
; (IRONCLAD::M 3 3 -24) (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 2 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 2 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 3 -16)
; (IRONCLAD::M 3 3 -24) (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 2 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 2 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 3 -16)
; (IRONCLAD::M 3 3 -24) (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 2 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 1 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 3 -16)
; (IRONCLAD::M 3 3 -24) (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 2 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 1 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 3 -16)
; (IRONCLAD::M 3 3 -24) (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 2 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::MOD64+ (AREF IRONCLAD::K (+ IRONCLAD::K-START 0))
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 0 -8)
; (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 2 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 1 -56)))
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 1 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 1 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 3 -40)
; (IRONCLAD::M 6 2 -48) (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 0 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 3 -40)
; (IRONCLAD::M 6 2 -48) (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 0 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 3 -40)
; (IRONCLAD::M 6 2 -48) (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 3 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 3 -40)
; (IRONCLAD::M 6 2 -48) (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 3 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 3 -40)
; (IRONCLAD::M 6 2 -48) (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 2 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 3 -40)
; (IRONCLAD::M 6 2 -48) (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 2 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 3 -40)
; (IRONCLAD::M 6 2 -48) (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::MOD64+ (AREF IRONCLAD::K (+ IRONCLAD::K-START 1))
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 1 -8)
; (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 3 -40)
; (IRONCLAD::M 6 2 -48) (IRONCLAD::M 7 2 -56)))
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 2 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 2 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0) (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 3 -48) (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 1 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0) (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 3 -48) (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 1 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0) (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 3 -48) (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 0 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0) (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 3 -48) (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 0 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0) (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 3 -48) (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 3 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0) (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 3 -48) (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 3 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0) (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 3 -48) (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::MOD64+ (AREF IRONCLAD::K (+ IRONCLAD::K-START 2))
; (LOGXOR (IRONCLAD::M 0 2 0) (IRONCLAD::M 1 2 -8)
; (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 3 -48) (IRONCLAD::M 7 3 -56)))
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 3 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 3 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0) (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16)
; (IRONCLAD::M 3 2 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 2 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0) (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16)
; (IRONCLAD::M 3 2 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 2 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0) (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16)
; (IRONCLAD::M 3 2 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 1 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0) (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16)
; (IRONCLAD::M 3 2 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 1 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0) (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16)
; (IRONCLAD::M 3 2 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 0 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0) (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16)
; (IRONCLAD::M 3 2 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 0 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0) (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16)
; (IRONCLAD::M 3 2 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::MOD64+ (AREF IRONCLAD::K (+ IRONCLAD::K-START 3))
; (LOGXOR (IRONCLAD::M 0 3 0) (IRONCLAD::M 1 3 -8)
; (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 0 -56)))
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; processing (DECLAIM (INLINE KALYNA-IMC256))
; processing (DEFUN KALYNA-IMC256 ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp
; in: DEFUN KALYNA-IMC256
; (IRONCLAD::M 0 0 0 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 1 0 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 1 0 -8) (IRONCLAD::M 2 2 0 -16)
; (IRONCLAD::M 3 3 0 -24) (IRONCLAD::M 4 0 0 -32)
; (IRONCLAD::M 5 1 0 -40) (IRONCLAD::M 6 2 0 -48)
; (IRONCLAD::M 7 3 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 2 0 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 1 0 -8) (IRONCLAD::M 2 2 0 -16)
; (IRONCLAD::M 3 3 0 -24) (IRONCLAD::M 4 0 0 -32)
; (IRONCLAD::M 5 1 0 -40) (IRONCLAD::M 6 2 0 -48)
; (IRONCLAD::M 7 3 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 3 0 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 1 0 -8) (IRONCLAD::M 2 2 0 -16)
; (IRONCLAD::M 3 3 0 -24) (IRONCLAD::M 4 0 0 -32)
; (IRONCLAD::M 5 1 0 -40) (IRONCLAD::M 6 2 0 -48)
; (IRONCLAD::M 7 3 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 0 0 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 1 0 -8) (IRONCLAD::M 2 2 0 -16)
; (IRONCLAD::M 3 3 0 -24) (IRONCLAD::M 4 0 0 -32)
; (IRONCLAD::M 5 1 0 -40) (IRONCLAD::M 6 2 0 -48)
; (IRONCLAD::M 7 3 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 1 0 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 1 0 -8) (IRONCLAD::M 2 2 0 -16)
; (IRONCLAD::M 3 3 0 -24) (IRONCLAD::M 4 0 0 -32)
; (IRONCLAD::M 5 1 0 -40) (IRONCLAD::M 6 2 0 -48)
; (IRONCLAD::M 7 3 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 2 0 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 1 0 -8) (IRONCLAD::M 2 2 0 -16)
; (IRONCLAD::M 3 3 0 -24) (IRONCLAD::M 4 0 0 -32)
; (IRONCLAD::M 5 1 0 -40) (IRONCLAD::M 6 2 0 -48)
; (IRONCLAD::M 7 3 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 3 0 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 1 0 -8) (IRONCLAD::M 2 2 0 -16)
; (IRONCLAD::M 3 3 0 -24) (IRONCLAD::M 4 0 0 -32)
; (IRONCLAD::M 5 1 0 -40) (IRONCLAD::M 6 2 0 -48)
; (IRONCLAD::M 7 3 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 0 1 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 1 1 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 1 0) (IRONCLAD::M 1 1 1 -8) (IRONCLAD::M 2 2 1 -16)
; (IRONCLAD::M 3 3 1 -24) (IRONCLAD::M 4 0 1 -32)
; (IRONCLAD::M 5 1 1 -40) (IRONCLAD::M 6 2 1 -48)
; (IRONCLAD::M 7 3 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 2 1 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 1 0) (IRONCLAD::M 1 1 1 -8) (IRONCLAD::M 2 2 1 -16)
; (IRONCLAD::M 3 3 1 -24) (IRONCLAD::M 4 0 1 -32)
; (IRONCLAD::M 5 1 1 -40) (IRONCLAD::M 6 2 1 -48)
; (IRONCLAD::M 7 3 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 3 1 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 1 0) (IRONCLAD::M 1 1 1 -8) (IRONCLAD::M 2 2 1 -16)
; (IRONCLAD::M 3 3 1 -24) (IRONCLAD::M 4 0 1 -32)
; (IRONCLAD::M 5 1 1 -40) (IRONCLAD::M 6 2 1 -48)
; (IRONCLAD::M 7 3 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 0 1 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 1 0) (IRONCLAD::M 1 1 1 -8) (IRONCLAD::M 2 2 1 -16)
; (IRONCLAD::M 3 3 1 -24) (IRONCLAD::M 4 0 1 -32)
; (IRONCLAD::M 5 1 1 -40) (IRONCLAD::M 6 2 1 -48)
; (IRONCLAD::M 7 3 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 1 1 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 1 0) (IRONCLAD::M 1 1 1 -8) (IRONCLAD::M 2 2 1 -16)
; (IRONCLAD::M 3 3 1 -24) (IRONCLAD::M 4 0 1 -32)
; (IRONCLAD::M 5 1 1 -40) (IRONCLAD::M 6 2 1 -48)
; (IRONCLAD::M 7 3 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 2 1 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 1 0) (IRONCLAD::M 1 1 1 -8) (IRONCLAD::M 2 2 1 -16)
; (IRONCLAD::M 3 3 1 -24) (IRONCLAD::M 4 0 1 -32)
; (IRONCLAD::M 5 1 1 -40) (IRONCLAD::M 6 2 1 -48)
; (IRONCLAD::M 7 3 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 3 1 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 1 0) (IRONCLAD::M 1 1 1 -8) (IRONCLAD::M 2 2 1 -16)
; (IRONCLAD::M 3 3 1 -24) (IRONCLAD::M 4 0 1 -32)
; (IRONCLAD::M 5 1 1 -40) (IRONCLAD::M 6 2 1 -48)
; (IRONCLAD::M 7 3 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 0 2 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 1 2 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 2 0) (IRONCLAD::M 1 1 2 -8) (IRONCLAD::M 2 2 2 -16)
; (IRONCLAD::M 3 3 2 -24) (IRONCLAD::M 4 0 2 -32)
; (IRONCLAD::M 5 1 2 -40) (IRONCLAD::M 6 2 2 -48)
; (IRONCLAD::M 7 3 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 2 2 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 2 0) (IRONCLAD::M 1 1 2 -8) (IRONCLAD::M 2 2 2 -16)
; (IRONCLAD::M 3 3 2 -24) (IRONCLAD::M 4 0 2 -32)
; (IRONCLAD::M 5 1 2 -40) (IRONCLAD::M 6 2 2 -48)
; (IRONCLAD::M 7 3 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 3 2 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 2 0) (IRONCLAD::M 1 1 2 -8) (IRONCLAD::M 2 2 2 -16)
; (IRONCLAD::M 3 3 2 -24) (IRONCLAD::M 4 0 2 -32)
; (IRONCLAD::M 5 1 2 -40) (IRONCLAD::M 6 2 2 -48)
; (IRONCLAD::M 7 3 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 0 2 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 2 0) (IRONCLAD::M 1 1 2 -8) (IRONCLAD::M 2 2 2 -16)
; (IRONCLAD::M 3 3 2 -24) (IRONCLAD::M 4 0 2 -32)
; (IRONCLAD::M 5 1 2 -40) (IRONCLAD::M 6 2 2 -48)
; (IRONCLAD::M 7 3 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 1 2 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 2 0) (IRONCLAD::M 1 1 2 -8) (IRONCLAD::M 2 2 2 -16)
; (IRONCLAD::M 3 3 2 -24) (IRONCLAD::M 4 0 2 -32)
; (IRONCLAD::M 5 1 2 -40) (IRONCLAD::M 6 2 2 -48)
; (IRONCLAD::M 7 3 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 2 2 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 2 0) (IRONCLAD::M 1 1 2 -8) (IRONCLAD::M 2 2 2 -16)
; (IRONCLAD::M 3 3 2 -24) (IRONCLAD::M 4 0 2 -32)
; (IRONCLAD::M 5 1 2 -40) (IRONCLAD::M 6 2 2 -48)
; (IRONCLAD::M 7 3 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 3 2 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 2 0) (IRONCLAD::M 1 1 2 -8) (IRONCLAD::M 2 2 2 -16)
; (IRONCLAD::M 3 3 2 -24) (IRONCLAD::M 4 0 2 -32)
; (IRONCLAD::M 5 1 2 -40) (IRONCLAD::M 6 2 2 -48)
; (IRONCLAD::M 7 3 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 0 3 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 1 3 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 3 0) (IRONCLAD::M 1 1 3 -8) (IRONCLAD::M 2 2 3 -16)
; (IRONCLAD::M 3 3 3 -24) (IRONCLAD::M 4 0 3 -32)
; (IRONCLAD::M 5 1 3 -40) (IRONCLAD::M 6 2 3 -48)
; (IRONCLAD::M 7 3 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 2 3 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 3 0) (IRONCLAD::M 1 1 3 -8) (IRONCLAD::M 2 2 3 -16)
; (IRONCLAD::M 3 3 3 -24) (IRONCLAD::M 4 0 3 -32)
; (IRONCLAD::M 5 1 3 -40) (IRONCLAD::M 6 2 3 -48)
; (IRONCLAD::M 7 3 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 3 3 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 3 0) (IRONCLAD::M 1 1 3 -8) (IRONCLAD::M 2 2 3 -16)
; (IRONCLAD::M 3 3 3 -24) (IRONCLAD::M 4 0 3 -32)
; (IRONCLAD::M 5 1 3 -40) (IRONCLAD::M 6 2 3 -48)
; (IRONCLAD::M 7 3 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 0 3 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 3 0) (IRONCLAD::M 1 1 3 -8) (IRONCLAD::M 2 2 3 -16)
; (IRONCLAD::M 3 3 3 -24) (IRONCLAD::M 4 0 3 -32)
; (IRONCLAD::M 5 1 3 -40) (IRONCLAD::M 6 2 3 -48)
; (IRONCLAD::M 7 3 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 1 3 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 3 0) (IRONCLAD::M 1 1 3 -8) (IRONCLAD::M 2 2 3 -16)
; (IRONCLAD::M 3 3 3 -24) (IRONCLAD::M 4 0 3 -32)
; (IRONCLAD::M 5 1 3 -40) (IRONCLAD::M 6 2 3 -48)
; (IRONCLAD::M 7 3 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 2 3 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 3 0) (IRONCLAD::M 1 1 3 -8) (IRONCLAD::M 2 2 3 -16)
; (IRONCLAD::M 3 3 3 -24) (IRONCLAD::M 4 0 3 -32)
; (IRONCLAD::M 5 1 3 -40) (IRONCLAD::M 6 2 3 -48)
; (IRONCLAD::M 7 3 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 3 3 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 3 0) (IRONCLAD::M 1 1 3 -8) (IRONCLAD::M 2 2 3 -16)
; (IRONCLAD::M 3 3 3 -24) (IRONCLAD::M 4 0 3 -32)
; (IRONCLAD::M 5 1 3 -40) (IRONCLAD::M 6 2 3 -48)
; (IRONCLAD::M 7 3 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; processing (DECLAIM (INLINE KALYNA-IG256))
; processing (DEFUN KALYNA-IG256 ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp
; in: DEFUN KALYNA-IG256
; (IRONCLAD::M 0 0 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 2 -40) (IRONCLAD::M 6 3 -48)
; (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 0 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 2 -40) (IRONCLAD::M 6 3 -48)
; (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 1 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 2 -40) (IRONCLAD::M 6 3 -48)
; (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 1 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 2 -40) (IRONCLAD::M 6 3 -48)
; (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 2 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 2 -40) (IRONCLAD::M 6 3 -48)
; (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 2 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 2 -40) (IRONCLAD::M 6 3 -48)
; (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 3 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 2 -40) (IRONCLAD::M 6 3 -48)
; (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 3 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 2 -40) (IRONCLAD::M 6 3 -48)
; (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 1 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 3 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 1 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 3 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 2 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 3 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 2 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 3 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 3 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 3 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 3 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 3 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 0 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 3 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 0 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 3 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 2 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)) (IRONCLAD::M 0 2 0)
; (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 2 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)) (IRONCLAD::M 0 2 0)
; (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 3 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)) (IRONCLAD::M 0 2 0)
; (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 3 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)) (IRONCLAD::M 0 2 0)
; (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 0 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)) (IRONCLAD::M 0 2 0)
; (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 0 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)) (IRONCLAD::M 0 2 0)
; (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 1 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)) (IRONCLAD::M 0 2 0)
; (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 1 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)) (IRONCLAD::M 0 2 0)
; (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 3 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)) (IRONCLAD::M 0 3 0)
; (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 2 -48)
; (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 3 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)) (IRONCLAD::M 0 3 0)
; (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 2 -48)
; (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 0 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)) (IRONCLAD::M 0 3 0)
; (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 2 -48)
; (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 0 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)) (IRONCLAD::M 0 3 0)
; (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 2 -48)
; (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 1 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)) (IRONCLAD::M 0 3 0)
; (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 2 -48)
; (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 1 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)) (IRONCLAD::M 0 3 0)
; (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 2 -48)
; (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 2 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)) (IRONCLAD::M 0 3 0)
; (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 2 -48)
; (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 2 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)) (IRONCLAD::M 0 3 0)
; (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 2 -48)
; (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; processing (DECLAIM (INLINE KALYNA-IGL256))
; processing (DEFUN KALYNA-IGL256 ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp
; in: DEFUN KALYNA-IGL256
; (IRONCLAD::MOD64-
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 0 -8 8)
; (IRONCLAD::M 2 1 -16 16) (IRONCLAD::M 3 1 -24 24)
; (IRONCLAD::M 0 2 -32 32) (IRONCLAD::M 1 2 -40 40)
; (IRONCLAD::M 2 3 -48 48) (IRONCLAD::M 3 3 -56 56))
; (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)))
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::MOD64-
; (LOGXOR (IRONCLAD::M 0 1 0 0) (IRONCLAD::M 1 1 -8 8)
; (IRONCLAD::M 2 2 -16 16) (IRONCLAD::M 3 2 -24 24)
; (IRONCLAD::M 0 3 -32 32) (IRONCLAD::M 1 3 -40 40)
; (IRONCLAD::M 2 0 -48 48) (IRONCLAD::M 3 0 -56 56))
; (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)))
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::MOD64-
; (LOGXOR (IRONCLAD::M 0 2 0 0) (IRONCLAD::M 1 2 -8 8)
; (IRONCLAD::M 2 3 -16 16) (IRONCLAD::M 3 3 -24 24)
; (IRONCLAD::M 0 0 -32 32) (IRONCLAD::M 1 0 -40 40)
; (IRONCLAD::M 2 1 -48 48) (IRONCLAD::M 3 1 -56 56))
; (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)))
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::MOD64-
; (LOGXOR (IRONCLAD::M 0 3 0 0) (IRONCLAD::M 1 3 -8 8)
; (IRONCLAD::M 2 0 -16 16) (IRONCLAD::M 3 0 -24 24)
; (IRONCLAD::M 0 1 -32 32) (IRONCLAD::M 1 1 -40 40)
; (IRONCLAD::M 2 2 -48 48) (IRONCLAD::M 3 2 -56 56))
; (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)))
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::M 0 0 0 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 0 -8 8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 2 1 -16 16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 3 1 -24 24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 0 2 -32 32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 1095216660481) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 1095216660481) . #2#), not a (VALUES FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 0 -8 8) (IRONCLAD::M 2 1 -16 16)
; (IRONCLAD::M 3 1 -24 24) (IRONCLAD::M 0 2 -32 32)
; (IRONCLAD::M 1 2 -40 40) (IRONCLAD::M 2 3 -48 48)
; (IRONCLAD::M 3 3 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
; The second argument is a (MOD 1095216660481), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The second argument is a (MOD 1095216660481), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 2 -40 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 280375465082881) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 280375465082881) . #2#), not a (VALUES
; FIXNUM &REST
; T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 0 -8 8) (IRONCLAD::M 2 1 -16 16)
; (IRONCLAD::M 3 1 -24 24) (IRONCLAD::M 0 2 -32 32)
; (IRONCLAD::M 1 2 -40 40) (IRONCLAD::M 2 3 -48 48)
; (IRONCLAD::M 3 3 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The second argument is a (MOD 280375465082881), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 280375465082881), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 3 -48 48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 71776119061217281) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 71776119061217281) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 0 -8 8) (IRONCLAD::M 2 1 -16 16)
; (IRONCLAD::M 3 1 -24 24) (IRONCLAD::M 0 2 -32 32)
; (IRONCLAD::M 1 2 -40 40) (IRONCLAD::M 2 3 -48 48)
; (IRONCLAD::M 3 3 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; The second argument is a (MOD 71776119061217281), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 71776119061217281), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 3 -56 56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 0 -8 8) (IRONCLAD::M 2 1 -16 16)
; (IRONCLAD::M 3 1 -24 24) (IRONCLAD::M 0 2 -32 32)
; (IRONCLAD::M 1 2 -40 40) (IRONCLAD::M 2 3 -48 48)
; (IRONCLAD::M 3 3 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; The second argument is a (MOD 18374686479671623681), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 18374686479671623681), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::MOD64-
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 0 -8 8)
; (IRONCLAD::M 2 1 -16 16) (IRONCLAD::M 3 1 -24 24)
; (IRONCLAD::M 0 2 -32 32) (IRONCLAD::M 1 2 -40 40)
; (IRONCLAD::M 2 3 -48 48) (IRONCLAD::M 3 3 -56 56))
; (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)))
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1#), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
; etc.
; (IRONCLAD::M 0 1 0 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 1 -8 8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 2 2 -16 16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 3 2 -24 24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 0 3 -32 32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 1095216660481) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 1095216660481) . #2#), not a (VALUES FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0 0) (IRONCLAD::M 1 1 -8 8) (IRONCLAD::M 2 2 -16 16)
; (IRONCLAD::M 3 2 -24 24) (IRONCLAD::M 0 3 -32 32)
; (IRONCLAD::M 1 3 -40 40) (IRONCLAD::M 2 0 -48 48)
; (IRONCLAD::M 3 0 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
; The second argument is a (MOD 1095216660481), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The second argument is a (MOD 1095216660481), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 3 -40 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 280375465082881) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 280375465082881) . #2#), not a (VALUES
; FIXNUM &REST
; T).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0 0) (IRONCLAD::M 1 1 -8 8) (IRONCLAD::M 2 2 -16 16)
; (IRONCLAD::M 3 2 -24 24) (IRONCLAD::M 0 3 -32 32)
; (IRONCLAD::M 1 3 -40 40) (IRONCLAD::M 2 0 -48 48)
; (IRONCLAD::M 3 0 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The second argument is a (MOD 280375465082881), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 280375465082881), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 0 -48 48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 71776119061217281) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 71776119061217281) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0 0) (IRONCLAD::M 1 1 -8 8) (IRONCLAD::M 2 2 -16 16)
; (IRONCLAD::M 3 2 -24 24) (IRONCLAD::M 0 3 -32 32)
; (IRONCLAD::M 1 3 -40 40) (IRONCLAD::M 2 0 -48 48)
; (IRONCLAD::M 3 0 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; The second argument is a (MOD 71776119061217281), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 71776119061217281), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 0 -56 56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0 0) (IRONCLAD::M 1 1 -8 8) (IRONCLAD::M 2 2 -16 16)
; (IRONCLAD::M 3 2 -24 24) (IRONCLAD::M 0 3 -32 32)
; (IRONCLAD::M 1 3 -40 40) (IRONCLAD::M 2 0 -48 48)
; (IRONCLAD::M 3 0 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; The second argument is a (MOD 18374686479671623681), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 18374686479671623681), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::MOD64-
; (LOGXOR (IRONCLAD::M 0 1 0 0) (IRONCLAD::M 1 1 -8 8)
; (IRONCLAD::M 2 2 -16 16) (IRONCLAD::M 3 2 -24 24)
; (IRONCLAD::M 0 3 -32 32) (IRONCLAD::M 1 3 -40 40)
; (IRONCLAD::M 2 0 -48 48) (IRONCLAD::M 3 0 -56 56))
; (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)))
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1#), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
; etc.
; (IRONCLAD::M 0 2 0 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 2 -8 8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 2 3 -16 16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 3 3 -24 24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 0 0 -32 32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 1095216660481) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 1095216660481) . #2#), not a (VALUES FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0 0) (IRONCLAD::M 1 2 -8 8) (IRONCLAD::M 2 3 -16 16)
; (IRONCLAD::M 3 3 -24 24) (IRONCLAD::M 0 0 -32 32)
; (IRONCLAD::M 1 0 -40 40) (IRONCLAD::M 2 1 -48 48)
; (IRONCLAD::M 3 1 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
; The second argument is a (MOD 1095216660481), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The second argument is a (MOD 1095216660481), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 0 -40 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 280375465082881) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 280375465082881) . #2#), not a (VALUES
; FIXNUM &REST
; T).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0 0) (IRONCLAD::M 1 2 -8 8) (IRONCLAD::M 2 3 -16 16)
; (IRONCLAD::M 3 3 -24 24) (IRONCLAD::M 0 0 -32 32)
; (IRONCLAD::M 1 0 -40 40) (IRONCLAD::M 2 1 -48 48)
; (IRONCLAD::M 3 1 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The second argument is a (MOD 280375465082881), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 280375465082881), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 1 -48 48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 71776119061217281) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 71776119061217281) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0 0) (IRONCLAD::M 1 2 -8 8) (IRONCLAD::M 2 3 -16 16)
; (IRONCLAD::M 3 3 -24 24) (IRONCLAD::M 0 0 -32 32)
; (IRONCLAD::M 1 0 -40 40) (IRONCLAD::M 2 1 -48 48)
; (IRONCLAD::M 3 1 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; The second argument is a (MOD 71776119061217281), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 71776119061217281), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 1 -56 56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0 0) (IRONCLAD::M 1 2 -8 8) (IRONCLAD::M 2 3 -16 16)
; (IRONCLAD::M 3 3 -24 24) (IRONCLAD::M 0 0 -32 32)
; (IRONCLAD::M 1 0 -40 40) (IRONCLAD::M 2 1 -48 48)
; (IRONCLAD::M 3 1 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; The second argument is a (MOD 18374686479671623681), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 18374686479671623681), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::MOD64-
; (LOGXOR (IRONCLAD::M 0 2 0 0) (IRONCLAD::M 1 2 -8 8)
; (IRONCLAD::M 2 3 -16 16) (IRONCLAD::M 3 3 -24 24)
; (IRONCLAD::M 0 0 -32 32) (IRONCLAD::M 1 0 -40 40)
; (IRONCLAD::M 2 1 -48 48) (IRONCLAD::M 3 1 -56 56))
; (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)))
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1#), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
; etc.
; (IRONCLAD::M 0 3 0 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 3 -8 8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 2 0 -16 16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 3 0 -24 24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 0 1 -32 32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 1095216660481) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 1095216660481) . #2#), not a (VALUES FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0 0) (IRONCLAD::M 1 3 -8 8) (IRONCLAD::M 2 0 -16 16)
; (IRONCLAD::M 3 0 -24 24) (IRONCLAD::M 0 1 -32 32)
; (IRONCLAD::M 1 1 -40 40) (IRONCLAD::M 2 2 -48 48)
; (IRONCLAD::M 3 2 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
; The second argument is a (MOD 1095216660481), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The second argument is a (MOD 1095216660481), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 1 -40 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 280375465082881) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 280375465082881) . #2#), not a (VALUES
; FIXNUM &REST
; T).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0 0) (IRONCLAD::M 1 3 -8 8) (IRONCLAD::M 2 0 -16 16)
; (IRONCLAD::M 3 0 -24 24) (IRONCLAD::M 0 1 -32 32)
; (IRONCLAD::M 1 1 -40 40) (IRONCLAD::M 2 2 -48 48)
; (IRONCLAD::M 3 2 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The second argument is a (MOD 280375465082881), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 280375465082881), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 2 -48 48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 71776119061217281) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 71776119061217281) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0 0) (IRONCLAD::M 1 3 -8 8) (IRONCLAD::M 2 0 -16 16)
; (IRONCLAD::M 3 0 -24 24) (IRONCLAD::M 0 1 -32 32)
; (IRONCLAD::M 1 1 -40 40) (IRONCLAD::M 2 2 -48 48)
; (IRONCLAD::M 3 2 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; The second argument is a (MOD 71776119061217281), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 71776119061217281), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 2 -56 56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0 0) (IRONCLAD::M 1 3 -8 8) (IRONCLAD::M 2 0 -16 16)
; (IRONCLAD::M 3 0 -24 24) (IRONCLAD::M 0 1 -32 32)
; (IRONCLAD::M 1 1 -40 40) (IRONCLAD::M 2 2 -48 48)
; (IRONCLAD::M 3 2 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; The second argument is a (MOD 18374686479671623681), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 18374686479671623681), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::MOD64-
; (LOGXOR (IRONCLAD::M 0 3 0 0) (IRONCLAD::M 1 3 -8 8)
; (IRONCLAD::M 2 0 -16 16) (IRONCLAD::M 3 0 -24 24)
; (IRONCLAD::M 0 1 -32 32) (IRONCLAD::M 1 1 -40 40)
; (IRONCLAD::M 2 2 -48 48) (IRONCLAD::M 3 2 -56 56))
; (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)))
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1#), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 0 -8 8) (IRONCLAD::M 2 1 -16 16)
; (IRONCLAD::M 3 1 -24 24) (IRONCLAD::M 0 2 -32 32)
; (IRONCLAD::M 1 2 -40 40) (IRONCLAD::M 2 3 -48 48)
; (IRONCLAD::M 3 3 -56 56))
;
; note: doing unsigned word to integer coercion (cost 20)
; (LOGXOR (IRONCLAD::M 0 1 0 0) (IRONCLAD::M 1 1 -8 8) (IRONCLAD::M 2 2 -16 16)
; (IRONCLAD::M 3 2 -24 24) (IRONCLAD::M 0 3 -32 32)
; (IRONCLAD::M 1 3 -40 40) (IRONCLAD::M 2 0 -48 48)
; (IRONCLAD::M 3 0 -56 56))
;
; note: doing unsigned word to integer coercion (cost 20)
; (LOGXOR (IRONCLAD::M 0 2 0 0) (IRONCLAD::M 1 2 -8 8) (IRONCLAD::M 2 3 -16 16)
; (IRONCLAD::M 3 3 -24 24) (IRONCLAD::M 0 0 -32 32)
; (IRONCLAD::M 1 0 -40 40) (IRONCLAD::M 2 1 -48 48)
; (IRONCLAD::M 3 1 -56 56))
;
; note: doing unsigned word to integer coercion (cost 20)
; (LOGXOR (IRONCLAD::M 0 3 0 0) (IRONCLAD::M 1 3 -8 8) (IRONCLAD::M 2 0 -16 16)
; (IRONCLAD::M 3 0 -24 24) (IRONCLAD::M 0 1 -32 32)
; (IRONCLAD::M 1 1 -40 40) (IRONCLAD::M 2 2 -48 48)
; (IRONCLAD::M 3 2 -56 56))
;
; note: doing unsigned word to integer coercion (cost 20)
; processing (DECLAIM (INLINE KALYNA-G256))
; processing (DEFUN KALYNA-G256 ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp
; in: DEFUN KALYNA-G256
; (IRONCLAD::M 0 0 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 2 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 0 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 2 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 3 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 2 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 3 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 2 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 2 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 2 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 2 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 2 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 1 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 2 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 1 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 2 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 1 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 3 -40) (IRONCLAD::M 6 2 -48)
; (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 1 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 3 -40) (IRONCLAD::M 6 2 -48)
; (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 0 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 3 -40) (IRONCLAD::M 6 2 -48)
; (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 0 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 3 -40) (IRONCLAD::M 6 2 -48)
; (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 3 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 3 -40) (IRONCLAD::M 6 2 -48)
; (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 3 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 3 -40) (IRONCLAD::M 6 2 -48)
; (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 2 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 3 -40) (IRONCLAD::M 6 2 -48)
; (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 2 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 3 -40) (IRONCLAD::M 6 2 -48)
; (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 2 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)) (IRONCLAD::M 0 2 0)
; (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 3 -48)
; (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 2 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)) (IRONCLAD::M 0 2 0)
; (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 3 -48)
; (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 1 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)) (IRONCLAD::M 0 2 0)
; (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 3 -48)
; (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 1 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)) (IRONCLAD::M 0 2 0)
; (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 3 -48)
; (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 0 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)) (IRONCLAD::M 0 2 0)
; (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 3 -48)
; (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 0 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)) (IRONCLAD::M 0 2 0)
; (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 3 -48)
; (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 3 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)) (IRONCLAD::M 0 2 0)
; (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 3 -48)
; (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 3 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)) (IRONCLAD::M 0 2 0)
; (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 3 -48)
; (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 3 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)) (IRONCLAD::M 0 3 0)
; (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 3 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)) (IRONCLAD::M 0 3 0)
; (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 2 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)) (IRONCLAD::M 0 3 0)
; (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 2 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)) (IRONCLAD::M 0 3 0)
; (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 1 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)) (IRONCLAD::M 0 3 0)
; (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 1 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)) (IRONCLAD::M 0 3 0)
; (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 0 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)) (IRONCLAD::M 0 3 0)
; (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 0 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)) (IRONCLAD::M 0 3 0)
; (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; processing (DEFCLASS KALYNA256 ...)
; processing (DEFMETHOD SCHEDULE-KEY ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp
; in: DEFMETHOD SCHEDULE-KEY (KALYNA256 T)
; (IRONCLAD::KALYNA-GL256 IRONCLAD::T1 IRONCLAD::T2 0 IRONCLAD::KA 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::KALYNA-GL256 IRONCLAD::T1 IRONCLAD::ENCRYPTION-ROUND-KEYS
; IRONCLAD::N IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::KALYNA-GL256 IRONCLAD::T1 IRONCLAD::ENCRYPTION-ROUND-KEYS 56
; IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::KALYNA-GL256 IRONCLAD::T1 IRONCLAD::ENCRYPTION-ROUND-KEYS 0
; IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::KALYNA-GL256 IRONCLAD::T1 IRONCLAD::ENCRYPTION-ROUND-KEYS 72
; IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::KALYNA-GL256 IRONCLAD::T1 IRONCLAD::ENCRYPTION-ROUND-KEYS
; IRONCLAD::N IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::KALYNA-GL256 IRONCLAD::T1 IRONCLAD::T2 0 IRONCLAD::KEY 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::KALYNA-GL256 IRONCLAD::T1 IRONCLAD::ENCRYPTION-ROUND-KEYS 0
; IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::KALYNA-G256 IRONCLAD::T2 IRONCLAD::T1 IRONCLAD::KEY 0)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-GL256 IRONCLAD::T1 IRONCLAD::T2 0 IRONCLAD::KEY 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G0256 IRONCLAD::T2 IRONCLAD::KS)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G256 IRONCLAD::T2 IRONCLAD::T1 IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-GL256 IRONCLAD::T1 IRONCLAD::ENCRYPTION-ROUND-KEYS 0
; IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-MAKE-ODD-KEY 4 IRONCLAD::ENCRYPTION-ROUND-KEYS 0
; IRONCLAD::ENCRYPTION-ROUND-KEYS 4)
; --> BLOCK MACROLET ECASE LET COND IF IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 2)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 2)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 3)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 2)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 3)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 2)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 3)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 3)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G256 IRONCLAD::T2 IRONCLAD::T1 IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-GL256 IRONCLAD::T1 IRONCLAD::ENCRYPTION-ROUND-KEYS 56
; IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IMC256 IRONCLAD::DECRYPTION-ROUND-KEYS IRONCLAD::N)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G256 IRONCLAD::T2 IRONCLAD::T1 IRONCLAD::KO 0)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-GL256 IRONCLAD::T1 IRONCLAD::T2 0 IRONCLAD::KA 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G0256 IRONCLAD::T2 IRONCLAD::KS)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G256 IRONCLAD::T2 IRONCLAD::T1 IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-GL256 IRONCLAD::T1 IRONCLAD::ENCRYPTION-ROUND-KEYS 0
; IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-MAKE-ODD-KEY 4 IRONCLAD::ENCRYPTION-ROUND-KEYS 0
; IRONCLAD::ENCRYPTION-ROUND-KEYS 4)
; --> BLOCK MACROLET ECASE LET COND IF IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 2)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 2)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 3)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 2)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 3)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 2)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 3)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 3)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G256 IRONCLAD::T2 IRONCLAD::T1 IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-GL256 IRONCLAD::T1 IRONCLAD::ENCRYPTION-ROUND-KEYS 72
; IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IMC256 IRONCLAD::DECRYPTION-ROUND-KEYS IRONCLAD::N)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G256 IRONCLAD::T2 IRONCLAD::T1 IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-GL256 IRONCLAD::T1 IRONCLAD::ENCRYPTION-ROUND-KEYS
; IRONCLAD::N IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-MAKE-ODD-KEY 4 IRONCLAD::ENCRYPTION-ROUND-KEYS IRONCLAD::N
; IRONCLAD::ENCRYPTION-ROUND-KEYS (+ IRONCLAD::N 4))
; --> BLOCK MACROLET ECASE LET COND IF IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 2)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 2)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 3)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 2)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 3)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 2)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 3)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 3)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G256 IRONCLAD::T2 IRONCLAD::T1 IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-GL256 IRONCLAD::T1 IRONCLAD::ENCRYPTION-ROUND-KEYS
; IRONCLAD::N IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-MAKE-ODD-KEY 4 IRONCLAD::ENCRYPTION-ROUND-KEYS IRONCLAD::N
; IRONCLAD::ENCRYPTION-ROUND-KEYS (+ IRONCLAD::N 4))
; --> BLOCK MACROLET ECASE LET COND IF IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 2)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 2)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 3)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 2)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 3)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 2)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 3)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 3)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; processing (DEFINE-BLOCK-ENCRYPTOR KALYNA256 ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp
; in: DEFINE-BLOCK-ENCRYPTOR KALYNA256
; (IRONCLAD::KALYNA-ADD-KEY 4 IRONCLAD::T2 0 IRONCLAD::T1
; IRONCLAD::ENCRYPTION-ROUND-KEYS)
; --> PROGN SYMBOL-MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT (+ IRONCLAD::PLAINTEXT-START 16))
; --> BLOCK DPB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START)
; --> BLOCK DPB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT (+ IRONCLAD::PLAINTEXT-START 24))
; --> BLOCK DPB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; (IRONCLAD::KALYNA-GL256 IRONCLAD::T2 IRONCLAD::T1 0
; IRONCLAD::ENCRYPTION-ROUND-KEYS 72)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::KALYNA-GL256 IRONCLAD::T2 IRONCLAD::T1 0
; IRONCLAD::ENCRYPTION-ROUND-KEYS 56)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT (+ IRONCLAD::PLAINTEXT-START 8))
; --> BLOCK DPB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; (IRONCLAD::KALYNA-ADD-KEY 4 IRONCLAD::T2 0 IRONCLAD::T1
; IRONCLAD::ENCRYPTION-ROUND-KEYS)
; --> PROGN SYMBOL-MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 36893488147419103231) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (MOD 36893488147419103231) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 36893488147419103231) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (MOD 36893488147419103231) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 36893488147419103231) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (MOD 36893488147419103231) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 36893488147419103231) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (MOD 36893488147419103231) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G256 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::ENCRYPTION-ROUND-KEYS 4)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G256 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::ENCRYPTION-ROUND-KEYS 8)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G256 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::ENCRYPTION-ROUND-KEYS 12)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G256 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::ENCRYPTION-ROUND-KEYS 16)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G256 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::ENCRYPTION-ROUND-KEYS 20)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G256 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::ENCRYPTION-ROUND-KEYS 24)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G256 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::ENCRYPTION-ROUND-KEYS 28)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G256 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::ENCRYPTION-ROUND-KEYS 32)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G256 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::ENCRYPTION-ROUND-KEYS 36)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G256 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::ENCRYPTION-ROUND-KEYS 40)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G256 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::ENCRYPTION-ROUND-KEYS 44)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G256 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::ENCRYPTION-ROUND-KEYS 48)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G256 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::ENCRYPTION-ROUND-KEYS 52)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G256 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::ENCRYPTION-ROUND-KEYS 56)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G256 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::ENCRYPTION-ROUND-KEYS 60)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G256 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::ENCRYPTION-ROUND-KEYS 64)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G256 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::ENCRYPTION-ROUND-KEYS 68)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-GL256 IRONCLAD::T2 IRONCLAD::T1 0
; IRONCLAD::ENCRYPTION-ROUND-KEYS 72)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-GL256 IRONCLAD::T2 IRONCLAD::T1 0
; IRONCLAD::ENCRYPTION-ROUND-KEYS 56)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (AREF IRONCLAD::T1 0)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
; (SETF (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START)
; (AREF IRONCLAD::T1 0)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT
; (+ IRONCLAD::CIPHERTEXT-START 8))
; (AREF IRONCLAD::T1 1)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT
; (+ IRONCLAD::CIPHERTEXT-START 16))
; (AREF IRONCLAD::T1 2)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT
; (+ IRONCLAD::CIPHERTEXT-START 24))
; (AREF IRONCLAD::T1 3))
; --> SETF LET* FUNCALL
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (AREF IRONCLAD::T1 1)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
; (SETF (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START)
; (AREF IRONCLAD::T1 0)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT
; (+ IRONCLAD::CIPHERTEXT-START 8))
; (AREF IRONCLAD::T1 1)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT
; (+ IRONCLAD::CIPHERTEXT-START 16))
; (AREF IRONCLAD::T1 2)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT
; (+ IRONCLAD::CIPHERTEXT-START 24))
; (AREF IRONCLAD::T1 3))
; --> SETF LET* FUNCALL
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (AREF IRONCLAD::T1 2)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
; (SETF (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START)
; (AREF IRONCLAD::T1 0)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT
; (+ IRONCLAD::CIPHERTEXT-START 8))
; (AREF IRONCLAD::T1 1)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT
; (+ IRONCLAD::CIPHERTEXT-START 16))
; (AREF IRONCLAD::T1 2)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT
; (+ IRONCLAD::CIPHERTEXT-START 24))
; (AREF IRONCLAD::T1 3))
; --> SETF LET* FUNCALL
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (AREF IRONCLAD::T1 3)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
; (SETF (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START)
; (AREF IRONCLAD::T1 0)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT
; (+ IRONCLAD::CIPHERTEXT-START 8))
; (AREF IRONCLAD::T1 1)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT
; (+ IRONCLAD::CIPHERTEXT-START 16))
; (AREF IRONCLAD::T1 2)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT
; (+ IRONCLAD::CIPHERTEXT-START 24))
; (AREF IRONCLAD::T1 3))
; --> SETF LET* FUNCALL
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START)
; --> BLOCK DPB
; ==>
; 1
;
; note: doing unsigned word to integer coercion (cost 20)
;
; note: doing unsigned word to integer coercion (cost 20)
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT (+ IRONCLAD::PLAINTEXT-START 8))
; --> BLOCK DPB
; ==>
; 1
;
; note: doing unsigned word to integer coercion (cost 20)
;
; note: doing unsigned word to integer coercion (cost 20)
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT (+ IRONCLAD::PLAINTEXT-START 16))
; --> BLOCK DPB
; ==>
; 1
;
; note: doing unsigned word to integer coercion (cost 20)
;
; note: doing unsigned word to integer coercion (cost 20)
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT (+ IRONCLAD::PLAINTEXT-START 24))
; --> BLOCK DPB
; ==>
; 1
;
; note: doing unsigned word to integer coercion (cost 20)
;
; note: doing unsigned word to integer coercion (cost 20)
; processing (DEFINE-BLOCK-DECRYPTOR KALYNA256 ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp
; in: DEFINE-BLOCK-DECRYPTOR KALYNA256
; (IRONCLAD::KALYNA-SUB-KEY 4 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::DECRYPTION-ROUND-KEYS 56)
; --> PROGN SYMBOL-MACROLET SETF LET* IRONCLAD::MOD64- LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::KALYNA-SUB-KEY 4 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::DECRYPTION-ROUND-KEYS 72)
; --> PROGN SYMBOL-MACROLET SETF LET* IRONCLAD::MOD64- LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT (+ IRONCLAD::CIPHERTEXT-START 24))
; --> BLOCK DPB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; (IRONCLAD::KALYNA-IGL256 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::DECRYPTION-ROUND-KEYS 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64- LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT (+ IRONCLAD::CIPHERTEXT-START 16))
; --> BLOCK DPB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT (+ IRONCLAD::CIPHERTEXT-START 8))
; --> BLOCK DPB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START)
; --> BLOCK DPB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; (IRONCLAD::KALYNA-SUB-KEY 4 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::DECRYPTION-ROUND-KEYS 72)
; --> PROGN SYMBOL-MACROLET SETF LET* IRONCLAD::MOD64- LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1#), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1#), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1#), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1#), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
; etc.
; (IRONCLAD::KALYNA-IMC256 IRONCLAD::T1 0)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IG256 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::DECRYPTION-ROUND-KEYS 68)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IG256 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::DECRYPTION-ROUND-KEYS 64)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IG256 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::DECRYPTION-ROUND-KEYS 60)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IG256 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::DECRYPTION-ROUND-KEYS 56)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-SUB-KEY 4 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::DECRYPTION-ROUND-KEYS 56)
; --> PROGN SYMBOL-MACROLET SETF LET* IRONCLAD::MOD64- LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1#), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1#), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1#), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1#), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
; etc.
; (IRONCLAD::KALYNA-IMC256 IRONCLAD::T1 0)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IG256 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::DECRYPTION-ROUND-KEYS 52)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IG256 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::DECRYPTION-ROUND-KEYS 48)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IG256 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::DECRYPTION-ROUND-KEYS 44)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IG256 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::DECRYPTION-ROUND-KEYS 40)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IG256 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::DECRYPTION-ROUND-KEYS 36)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IG256 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::DECRYPTION-ROUND-KEYS 32)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IG256 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::DECRYPTION-ROUND-KEYS 28)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IG256 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::DECRYPTION-ROUND-KEYS 24)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IG256 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::DECRYPTION-ROUND-KEYS 20)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IG256 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::DECRYPTION-ROUND-KEYS 16)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IG256 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::DECRYPTION-ROUND-KEYS 12)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IG256 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::DECRYPTION-ROUND-KEYS 8)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IG256 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::DECRYPTION-ROUND-KEYS 4)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IGL256 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::DECRYPTION-ROUND-KEYS 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64- LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 1095216660481) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 1095216660481) . #2#), not a (VALUES FIXNUM
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
; The second argument is a (MOD 1095216660481), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The second argument is a (MOD 1095216660481), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 280375465082881) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 280375465082881) . #2#), not a (VALUES
; FIXNUM &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The second argument is a (MOD 280375465082881), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 280375465082881), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 71776119061217281) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 71776119061217281) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; The second argument is a (MOD 71776119061217281), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 71776119061217281), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; The second argument is a (MOD 18374686479671623681), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 18374686479671623681), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1#), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 1095216660481) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 1095216660481) . #2#), not a (VALUES FIXNUM
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
; The second argument is a (MOD 1095216660481), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The second argument is a (MOD 1095216660481), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 280375465082881) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 280375465082881) . #2#), not a (VALUES
; FIXNUM &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The second argument is a (MOD 280375465082881), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 280375465082881), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 71776119061217281) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 71776119061217281) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; The second argument is a (MOD 71776119061217281), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 71776119061217281), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; The second argument is a (MOD 18374686479671623681), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 18374686479671623681), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1#), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 1095216660481) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 1095216660481) . #2#), not a (VALUES FIXNUM
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
; The second argument is a (MOD 1095216660481), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The second argument is a (MOD 1095216660481), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 280375465082881) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 280375465082881) . #2#), not a (VALUES
; FIXNUM &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The second argument is a (MOD 280375465082881), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 280375465082881), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 71776119061217281) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 71776119061217281) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; The second argument is a (MOD 71776119061217281), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 71776119061217281), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; The second argument is a (MOD 18374686479671623681), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 18374686479671623681), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1#), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 1095216660481) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 1095216660481) . #2#), not a (VALUES FIXNUM
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
; The second argument is a (MOD 1095216660481), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The second argument is a (MOD 1095216660481), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 280375465082881) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 280375465082881) . #2#), not a (VALUES
; FIXNUM &REST
; T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The second argument is a (MOD 280375465082881), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 280375465082881), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 71776119061217281) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 71776119061217281) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; The second argument is a (MOD 71776119061217281), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 71776119061217281), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; The second argument is a (MOD 18374686479671623681), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 18374686479671623681), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1#), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
; etc.
; (AREF IRONCLAD::T1 0)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
; (SETF (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START)
; (AREF IRONCLAD::T1 0)
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT
; (+ IRONCLAD::PLAINTEXT-START 8))
; (AREF IRONCLAD::T1 1)
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT
; (+ IRONCLAD::PLAINTEXT-START 16))
; (AREF IRONCLAD::T1 2)
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT
; (+ IRONCLAD::PLAINTEXT-START 24))
; (AREF IRONCLAD::T1 3))
; --> SETF LET* FUNCALL
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (AREF IRONCLAD::T1 1)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
; (SETF (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START)
; (AREF IRONCLAD::T1 0)
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT
; (+ IRONCLAD::PLAINTEXT-START 8))
; (AREF IRONCLAD::T1 1)
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT
; (+ IRONCLAD::PLAINTEXT-START 16))
; (AREF IRONCLAD::T1 2)
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT
; (+ IRONCLAD::PLAINTEXT-START 24))
; (AREF IRONCLAD::T1 3))
; --> SETF LET* FUNCALL
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (AREF IRONCLAD::T1 2)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
; (SETF (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START)
; (AREF IRONCLAD::T1 0)
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT
; (+ IRONCLAD::PLAINTEXT-START 8))
; (AREF IRONCLAD::T1 1)
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT
; (+ IRONCLAD::PLAINTEXT-START 16))
; (AREF IRONCLAD::T1 2)
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT
; (+ IRONCLAD::PLAINTEXT-START 24))
; (AREF IRONCLAD::T1 3))
; --> SETF LET* FUNCALL
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (AREF IRONCLAD::T1 3)
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
; (SETF (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START)
; (AREF IRONCLAD::T1 0)
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT
; (+ IRONCLAD::PLAINTEXT-START 8))
; (AREF IRONCLAD::T1 1)
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT
; (+ IRONCLAD::PLAINTEXT-START 16))
; (AREF IRONCLAD::T1 2)
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT
; (+ IRONCLAD::PLAINTEXT-START 24))
; (AREF IRONCLAD::T1 3))
; --> SETF LET* FUNCALL
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START)
; --> BLOCK DPB
; ==>
; 1
;
; note: doing unsigned word to integer coercion (cost 20)
;
; note: doing unsigned word to integer coercion (cost 20)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT (+ IRONCLAD::CIPHERTEXT-START 8))
; --> BLOCK DPB
; ==>
; 1
;
; note: doing unsigned word to integer coercion (cost 20)
;
; note: doing unsigned word to integer coercion (cost 20)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT (+ IRONCLAD::CIPHERTEXT-START 16))
; --> BLOCK DPB
; ==>
; 1
;
; note: doing unsigned word to integer coercion (cost 20)
;
; note: doing unsigned word to integer coercion (cost 20)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT (+ IRONCLAD::CIPHERTEXT-START 24))
; --> BLOCK DPB
; ==>
; 1
;
; note: doing unsigned word to integer coercion (cost 20)
;
; note: doing unsigned word to integer coercion (cost 20)
; (IRONCLAD::KALYNA-IGL256 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::DECRYPTION-ROUND-KEYS 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64- LDB
; ==>
; 1
;
; note: doing unsigned word to integer coercion (cost 20)
;
; note: doing unsigned word to integer coercion (cost 20)
;
; note: doing unsigned word to integer coercion (cost 20)
;
; note: doing unsigned word to integer coercion (cost 20)
; processing (DEFCIPHER KALYNA256 ...)
; processing (DECLAIM (INLINE KALYNA-G0512))
; processing (DEFUN KALYNA-G0512 ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp
; in: DEFUN KALYNA-G0512
; (IRONCLAD::M 0 0 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 7 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 7 -8) (IRONCLAD::M 2 6 -16)
; (IRONCLAD::M 3 5 -24) (IRONCLAD::M 4 4 -32) (IRONCLAD::M 5 3 -40)
; (IRONCLAD::M 6 2 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 6 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 7 -8) (IRONCLAD::M 2 6 -16)
; (IRONCLAD::M 3 5 -24) (IRONCLAD::M 4 4 -32) (IRONCLAD::M 5 3 -40)
; (IRONCLAD::M 6 2 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 5 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 7 -8) (IRONCLAD::M 2 6 -16)
; (IRONCLAD::M 3 5 -24) (IRONCLAD::M 4 4 -32) (IRONCLAD::M 5 3 -40)
; (IRONCLAD::M 6 2 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 4 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 7 -8) (IRONCLAD::M 2 6 -16)
; (IRONCLAD::M 3 5 -24) (IRONCLAD::M 4 4 -32) (IRONCLAD::M 5 3 -40)
; (IRONCLAD::M 6 2 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 3 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 7 -8) (IRONCLAD::M 2 6 -16)
; (IRONCLAD::M 3 5 -24) (IRONCLAD::M 4 4 -32) (IRONCLAD::M 5 3 -40)
; (IRONCLAD::M 6 2 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 2 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 7 -8) (IRONCLAD::M 2 6 -16)
; (IRONCLAD::M 3 5 -24) (IRONCLAD::M 4 4 -32) (IRONCLAD::M 5 3 -40)
; (IRONCLAD::M 6 2 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 1 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 7 -8) (IRONCLAD::M 2 6 -16)
; (IRONCLAD::M 3 5 -24) (IRONCLAD::M 4 4 -32) (IRONCLAD::M 5 3 -40)
; (IRONCLAD::M 6 2 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 1 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 0 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 7 -16)
; (IRONCLAD::M 3 6 -24) (IRONCLAD::M 4 5 -32) (IRONCLAD::M 5 4 -40)
; (IRONCLAD::M 6 3 -48) (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 7 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 7 -16)
; (IRONCLAD::M 3 6 -24) (IRONCLAD::M 4 5 -32) (IRONCLAD::M 5 4 -40)
; (IRONCLAD::M 6 3 -48) (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 6 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 7 -16)
; (IRONCLAD::M 3 6 -24) (IRONCLAD::M 4 5 -32) (IRONCLAD::M 5 4 -40)
; (IRONCLAD::M 6 3 -48) (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 5 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 7 -16)
; (IRONCLAD::M 3 6 -24) (IRONCLAD::M 4 5 -32) (IRONCLAD::M 5 4 -40)
; (IRONCLAD::M 6 3 -48) (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 4 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 7 -16)
; (IRONCLAD::M 3 6 -24) (IRONCLAD::M 4 5 -32) (IRONCLAD::M 5 4 -40)
; (IRONCLAD::M 6 3 -48) (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 3 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 7 -16)
; (IRONCLAD::M 3 6 -24) (IRONCLAD::M 4 5 -32) (IRONCLAD::M 5 4 -40)
; (IRONCLAD::M 6 3 -48) (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 2 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 7 -16)
; (IRONCLAD::M 3 6 -24) (IRONCLAD::M 4 5 -32) (IRONCLAD::M 5 4 -40)
; (IRONCLAD::M 6 3 -48) (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 2 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 1 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 7 -24) (IRONCLAD::M 4 6 -32) (IRONCLAD::M 5 5 -40)
; (IRONCLAD::M 6 4 -48) (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 0 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 7 -24) (IRONCLAD::M 4 6 -32) (IRONCLAD::M 5 5 -40)
; (IRONCLAD::M 6 4 -48) (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 7 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 7 -24) (IRONCLAD::M 4 6 -32) (IRONCLAD::M 5 5 -40)
; (IRONCLAD::M 6 4 -48) (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 6 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 7 -24) (IRONCLAD::M 4 6 -32) (IRONCLAD::M 5 5 -40)
; (IRONCLAD::M 6 4 -48) (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 5 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 7 -24) (IRONCLAD::M 4 6 -32) (IRONCLAD::M 5 5 -40)
; (IRONCLAD::M 6 4 -48) (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 4 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 7 -24) (IRONCLAD::M 4 6 -32) (IRONCLAD::M 5 5 -40)
; (IRONCLAD::M 6 4 -48) (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 3 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 7 -24) (IRONCLAD::M 4 6 -32) (IRONCLAD::M 5 5 -40)
; (IRONCLAD::M 6 4 -48) (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 3 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 2 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0) (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 7 -32) (IRONCLAD::M 5 6 -40)
; (IRONCLAD::M 6 5 -48) (IRONCLAD::M 7 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 1 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0) (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 7 -32) (IRONCLAD::M 5 6 -40)
; (IRONCLAD::M 6 5 -48) (IRONCLAD::M 7 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 0 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0) (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 7 -32) (IRONCLAD::M 5 6 -40)
; (IRONCLAD::M 6 5 -48) (IRONCLAD::M 7 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 7 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0) (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 7 -32) (IRONCLAD::M 5 6 -40)
; (IRONCLAD::M 6 5 -48) (IRONCLAD::M 7 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 6 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0) (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 7 -32) (IRONCLAD::M 5 6 -40)
; (IRONCLAD::M 6 5 -48) (IRONCLAD::M 7 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 5 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0) (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 7 -32) (IRONCLAD::M 5 6 -40)
; (IRONCLAD::M 6 5 -48) (IRONCLAD::M 7 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 4 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0) (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 7 -32) (IRONCLAD::M 5 6 -40)
; (IRONCLAD::M 6 5 -48) (IRONCLAD::M 7 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 4 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 3 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 4 0) (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 7 -40)
; (IRONCLAD::M 6 6 -48) (IRONCLAD::M 7 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 2 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 4 0) (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 7 -40)
; (IRONCLAD::M 6 6 -48) (IRONCLAD::M 7 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 1 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 4 0) (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 7 -40)
; (IRONCLAD::M 6 6 -48) (IRONCLAD::M 7 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 0 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 4 0) (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 7 -40)
; (IRONCLAD::M 6 6 -48) (IRONCLAD::M 7 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 7 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 4 0) (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 7 -40)
; (IRONCLAD::M 6 6 -48) (IRONCLAD::M 7 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 6 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 4 0) (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 7 -40)
; (IRONCLAD::M 6 6 -48) (IRONCLAD::M 7 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 5 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 4 0) (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 7 -40)
; (IRONCLAD::M 6 6 -48) (IRONCLAD::M 7 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 5 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 4 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 5 0) (IRONCLAD::M 1 4 -8) (IRONCLAD::M 2 3 -16)
; (IRONCLAD::M 3 2 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 7 -48) (IRONCLAD::M 7 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 3 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 5 0) (IRONCLAD::M 1 4 -8) (IRONCLAD::M 2 3 -16)
; (IRONCLAD::M 3 2 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 7 -48) (IRONCLAD::M 7 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 2 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 5 0) (IRONCLAD::M 1 4 -8) (IRONCLAD::M 2 3 -16)
; (IRONCLAD::M 3 2 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 7 -48) (IRONCLAD::M 7 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 1 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 5 0) (IRONCLAD::M 1 4 -8) (IRONCLAD::M 2 3 -16)
; (IRONCLAD::M 3 2 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 7 -48) (IRONCLAD::M 7 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 0 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 5 0) (IRONCLAD::M 1 4 -8) (IRONCLAD::M 2 3 -16)
; (IRONCLAD::M 3 2 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 7 -48) (IRONCLAD::M 7 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 7 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 5 0) (IRONCLAD::M 1 4 -8) (IRONCLAD::M 2 3 -16)
; (IRONCLAD::M 3 2 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 7 -48) (IRONCLAD::M 7 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 6 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 5 0) (IRONCLAD::M 1 4 -8) (IRONCLAD::M 2 3 -16)
; (IRONCLAD::M 3 2 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 7 -48) (IRONCLAD::M 7 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 6 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 5 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 6 0) (IRONCLAD::M 1 5 -8) (IRONCLAD::M 2 4 -16)
; (IRONCLAD::M 3 3 -24) (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 4 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 6 0) (IRONCLAD::M 1 5 -8) (IRONCLAD::M 2 4 -16)
; (IRONCLAD::M 3 3 -24) (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 3 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 6 0) (IRONCLAD::M 1 5 -8) (IRONCLAD::M 2 4 -16)
; (IRONCLAD::M 3 3 -24) (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 2 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 6 0) (IRONCLAD::M 1 5 -8) (IRONCLAD::M 2 4 -16)
; (IRONCLAD::M 3 3 -24) (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 1 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 6 0) (IRONCLAD::M 1 5 -8) (IRONCLAD::M 2 4 -16)
; (IRONCLAD::M 3 3 -24) (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 0 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 6 0) (IRONCLAD::M 1 5 -8) (IRONCLAD::M 2 4 -16)
; (IRONCLAD::M 3 3 -24) (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 7 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 6 0) (IRONCLAD::M 1 5 -8) (IRONCLAD::M 2 4 -16)
; (IRONCLAD::M 3 3 -24) (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 7 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 6 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 7 0) (IRONCLAD::M 1 6 -8) (IRONCLAD::M 2 5 -16)
; (IRONCLAD::M 3 4 -24) (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 2 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 5 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 7 0) (IRONCLAD::M 1 6 -8) (IRONCLAD::M 2 5 -16)
; (IRONCLAD::M 3 4 -24) (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 2 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 4 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 7 0) (IRONCLAD::M 1 6 -8) (IRONCLAD::M 2 5 -16)
; (IRONCLAD::M 3 4 -24) (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 2 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 3 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 7 0) (IRONCLAD::M 1 6 -8) (IRONCLAD::M 2 5 -16)
; (IRONCLAD::M 3 4 -24) (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 2 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 2 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 7 0) (IRONCLAD::M 1 6 -8) (IRONCLAD::M 2 5 -16)
; (IRONCLAD::M 3 4 -24) (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 2 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 1 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 7 0) (IRONCLAD::M 1 6 -8) (IRONCLAD::M 2 5 -16)
; (IRONCLAD::M 3 4 -24) (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 2 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 0 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 7 0) (IRONCLAD::M 1 6 -8) (IRONCLAD::M 2 5 -16)
; (IRONCLAD::M 3 4 -24) (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 2 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; processing (DECLAIM (INLINE KALYNA-GL512))
; processing (DEFUN KALYNA-GL512 ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp
; in: DEFUN KALYNA-GL512
; (IRONCLAD::MOD64+ (AREF IRONCLAD::K (+ IRONCLAD::K-START 0))
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 7 -8)
; (IRONCLAD::M 2 6 -16) (IRONCLAD::M 3 5 -24)
; (IRONCLAD::M 4 4 -32) (IRONCLAD::M 5 3 -40)
; (IRONCLAD::M 6 2 -48) (IRONCLAD::M 7 1 -56)))
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::MOD64+ (AREF IRONCLAD::K (+ IRONCLAD::K-START 1))
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 0 -8)
; (IRONCLAD::M 2 7 -16) (IRONCLAD::M 3 6 -24)
; (IRONCLAD::M 4 5 -32) (IRONCLAD::M 5 4 -40)
; (IRONCLAD::M 6 3 -48) (IRONCLAD::M 7 2 -56)))
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::MOD64+ (AREF IRONCLAD::K (+ IRONCLAD::K-START 2))
; (LOGXOR (IRONCLAD::M 0 2 0) (IRONCLAD::M 1 1 -8)
; (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 7 -24)
; (IRONCLAD::M 4 6 -32) (IRONCLAD::M 5 5 -40)
; (IRONCLAD::M 6 4 -48) (IRONCLAD::M 7 3 -56)))
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::MOD64+ (AREF IRONCLAD::K (+ IRONCLAD::K-START 3))
; (LOGXOR (IRONCLAD::M 0 3 0) (IRONCLAD::M 1 2 -8)
; (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 7 -32) (IRONCLAD::M 5 6 -40)
; (IRONCLAD::M 6 5 -48) (IRONCLAD::M 7 4 -56)))
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::MOD64+ (AREF IRONCLAD::K (+ IRONCLAD::K-START 4))
; (LOGXOR (IRONCLAD::M 0 4 0) (IRONCLAD::M 1 3 -8)
; (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 7 -40)
; (IRONCLAD::M 6 6 -48) (IRONCLAD::M 7 5 -56)))
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::MOD64+ (AREF IRONCLAD::K (+ IRONCLAD::K-START 5))
; (LOGXOR (IRONCLAD::M 0 5 0) (IRONCLAD::M 1 4 -8)
; (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 7 -48) (IRONCLAD::M 7 6 -56)))
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::MOD64+ (AREF IRONCLAD::K (+ IRONCLAD::K-START 6))
; (LOGXOR (IRONCLAD::M 0 6 0) (IRONCLAD::M 1 5 -8)
; (IRONCLAD::M 2 4 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 7 -56)))
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::MOD64+ (AREF IRONCLAD::K (+ IRONCLAD::K-START 7))
; (LOGXOR (IRONCLAD::M 0 7 0) (IRONCLAD::M 1 6 -8)
; (IRONCLAD::M 2 5 -16) (IRONCLAD::M 3 4 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 2 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 0 -56)))
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::M 0 0 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 7 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 7 -8) (IRONCLAD::M 2 6 -16)
; (IRONCLAD::M 3 5 -24) (IRONCLAD::M 4 4 -32) (IRONCLAD::M 5 3 -40)
; (IRONCLAD::M 6 2 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 6 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 7 -8) (IRONCLAD::M 2 6 -16)
; (IRONCLAD::M 3 5 -24) (IRONCLAD::M 4 4 -32) (IRONCLAD::M 5 3 -40)
; (IRONCLAD::M 6 2 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 5 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 7 -8) (IRONCLAD::M 2 6 -16)
; (IRONCLAD::M 3 5 -24) (IRONCLAD::M 4 4 -32) (IRONCLAD::M 5 3 -40)
; (IRONCLAD::M 6 2 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 4 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 7 -8) (IRONCLAD::M 2 6 -16)
; (IRONCLAD::M 3 5 -24) (IRONCLAD::M 4 4 -32) (IRONCLAD::M 5 3 -40)
; (IRONCLAD::M 6 2 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 3 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 7 -8) (IRONCLAD::M 2 6 -16)
; (IRONCLAD::M 3 5 -24) (IRONCLAD::M 4 4 -32) (IRONCLAD::M 5 3 -40)
; (IRONCLAD::M 6 2 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 2 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 7 -8) (IRONCLAD::M 2 6 -16)
; (IRONCLAD::M 3 5 -24) (IRONCLAD::M 4 4 -32) (IRONCLAD::M 5 3 -40)
; (IRONCLAD::M 6 2 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 1 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 7 -8) (IRONCLAD::M 2 6 -16)
; (IRONCLAD::M 3 5 -24) (IRONCLAD::M 4 4 -32) (IRONCLAD::M 5 3 -40)
; (IRONCLAD::M 6 2 -48) (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::MOD64+ (AREF IRONCLAD::K (+ IRONCLAD::K-START 0))
; (LOGXOR (IRONCLAD::M 0 0 0) (IRONCLAD::M 1 7 -8)
; (IRONCLAD::M 2 6 -16) (IRONCLAD::M 3 5 -24)
; (IRONCLAD::M 4 4 -32) (IRONCLAD::M 5 3 -40)
; (IRONCLAD::M 6 2 -48) (IRONCLAD::M 7 1 -56)))
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 1 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 0 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 7 -16)
; (IRONCLAD::M 3 6 -24) (IRONCLAD::M 4 5 -32) (IRONCLAD::M 5 4 -40)
; (IRONCLAD::M 6 3 -48) (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 7 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 7 -16)
; (IRONCLAD::M 3 6 -24) (IRONCLAD::M 4 5 -32) (IRONCLAD::M 5 4 -40)
; (IRONCLAD::M 6 3 -48) (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 6 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 7 -16)
; (IRONCLAD::M 3 6 -24) (IRONCLAD::M 4 5 -32) (IRONCLAD::M 5 4 -40)
; (IRONCLAD::M 6 3 -48) (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 5 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 7 -16)
; (IRONCLAD::M 3 6 -24) (IRONCLAD::M 4 5 -32) (IRONCLAD::M 5 4 -40)
; (IRONCLAD::M 6 3 -48) (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 4 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 7 -16)
; (IRONCLAD::M 3 6 -24) (IRONCLAD::M 4 5 -32) (IRONCLAD::M 5 4 -40)
; (IRONCLAD::M 6 3 -48) (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 3 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 7 -16)
; (IRONCLAD::M 3 6 -24) (IRONCLAD::M 4 5 -32) (IRONCLAD::M 5 4 -40)
; (IRONCLAD::M 6 3 -48) (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 2 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 7 -16)
; (IRONCLAD::M 3 6 -24) (IRONCLAD::M 4 5 -32) (IRONCLAD::M 5 4 -40)
; (IRONCLAD::M 6 3 -48) (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::MOD64+ (AREF IRONCLAD::K (+ IRONCLAD::K-START 1))
; (LOGXOR (IRONCLAD::M 0 1 0) (IRONCLAD::M 1 0 -8)
; (IRONCLAD::M 2 7 -16) (IRONCLAD::M 3 6 -24)
; (IRONCLAD::M 4 5 -32) (IRONCLAD::M 5 4 -40)
; (IRONCLAD::M 6 3 -48) (IRONCLAD::M 7 2 -56)))
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 2 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 1 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 7 -24) (IRONCLAD::M 4 6 -32) (IRONCLAD::M 5 5 -40)
; (IRONCLAD::M 6 4 -48) (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 0 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 7 -24) (IRONCLAD::M 4 6 -32) (IRONCLAD::M 5 5 -40)
; (IRONCLAD::M 6 4 -48) (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 7 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 7 -24) (IRONCLAD::M 4 6 -32) (IRONCLAD::M 5 5 -40)
; (IRONCLAD::M 6 4 -48) (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 6 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 7 -24) (IRONCLAD::M 4 6 -32) (IRONCLAD::M 5 5 -40)
; (IRONCLAD::M 6 4 -48) (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 5 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 7 -24) (IRONCLAD::M 4 6 -32) (IRONCLAD::M 5 5 -40)
; (IRONCLAD::M 6 4 -48) (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 4 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 7 -24) (IRONCLAD::M 4 6 -32) (IRONCLAD::M 5 5 -40)
; (IRONCLAD::M 6 4 -48) (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 3 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0) (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16)
; (IRONCLAD::M 3 7 -24) (IRONCLAD::M 4 6 -32) (IRONCLAD::M 5 5 -40)
; (IRONCLAD::M 6 4 -48) (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::MOD64+ (AREF IRONCLAD::K (+ IRONCLAD::K-START 2))
; (LOGXOR (IRONCLAD::M 0 2 0) (IRONCLAD::M 1 1 -8)
; (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 7 -24)
; (IRONCLAD::M 4 6 -32) (IRONCLAD::M 5 5 -40)
; (IRONCLAD::M 6 4 -48) (IRONCLAD::M 7 3 -56)))
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 3 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 2 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0) (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 7 -32) (IRONCLAD::M 5 6 -40)
; (IRONCLAD::M 6 5 -48) (IRONCLAD::M 7 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 1 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0) (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 7 -32) (IRONCLAD::M 5 6 -40)
; (IRONCLAD::M 6 5 -48) (IRONCLAD::M 7 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 0 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0) (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 7 -32) (IRONCLAD::M 5 6 -40)
; (IRONCLAD::M 6 5 -48) (IRONCLAD::M 7 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 7 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0) (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 7 -32) (IRONCLAD::M 5 6 -40)
; (IRONCLAD::M 6 5 -48) (IRONCLAD::M 7 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 6 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0) (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 7 -32) (IRONCLAD::M 5 6 -40)
; (IRONCLAD::M 6 5 -48) (IRONCLAD::M 7 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 5 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0) (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 7 -32) (IRONCLAD::M 5 6 -40)
; (IRONCLAD::M 6 5 -48) (IRONCLAD::M 7 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 4 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0) (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16)
; (IRONCLAD::M 3 0 -24) (IRONCLAD::M 4 7 -32) (IRONCLAD::M 5 6 -40)
; (IRONCLAD::M 6 5 -48) (IRONCLAD::M 7 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::MOD64+ (AREF IRONCLAD::K (+ IRONCLAD::K-START 3))
; (LOGXOR (IRONCLAD::M 0 3 0) (IRONCLAD::M 1 2 -8)
; (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 7 -32) (IRONCLAD::M 5 6 -40)
; (IRONCLAD::M 6 5 -48) (IRONCLAD::M 7 4 -56)))
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 4 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 3 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 4 0) (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 7 -40)
; (IRONCLAD::M 6 6 -48) (IRONCLAD::M 7 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 2 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 4 0) (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 7 -40)
; (IRONCLAD::M 6 6 -48) (IRONCLAD::M 7 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 1 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 4 0) (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 7 -40)
; (IRONCLAD::M 6 6 -48) (IRONCLAD::M 7 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 0 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 4 0) (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 7 -40)
; (IRONCLAD::M 6 6 -48) (IRONCLAD::M 7 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 7 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 4 0) (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 7 -40)
; (IRONCLAD::M 6 6 -48) (IRONCLAD::M 7 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 6 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 4 0) (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 7 -40)
; (IRONCLAD::M 6 6 -48) (IRONCLAD::M 7 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 5 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 4 0) (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16)
; (IRONCLAD::M 3 1 -24) (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 7 -40)
; (IRONCLAD::M 6 6 -48) (IRONCLAD::M 7 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::MOD64+ (AREF IRONCLAD::K (+ IRONCLAD::K-START 4))
; (LOGXOR (IRONCLAD::M 0 4 0) (IRONCLAD::M 1 3 -8)
; (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 7 -40)
; (IRONCLAD::M 6 6 -48) (IRONCLAD::M 7 5 -56)))
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 5 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 4 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 5 0) (IRONCLAD::M 1 4 -8) (IRONCLAD::M 2 3 -16)
; (IRONCLAD::M 3 2 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 7 -48) (IRONCLAD::M 7 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 3 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 5 0) (IRONCLAD::M 1 4 -8) (IRONCLAD::M 2 3 -16)
; (IRONCLAD::M 3 2 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 7 -48) (IRONCLAD::M 7 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 2 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 5 0) (IRONCLAD::M 1 4 -8) (IRONCLAD::M 2 3 -16)
; (IRONCLAD::M 3 2 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 7 -48) (IRONCLAD::M 7 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 1 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 5 0) (IRONCLAD::M 1 4 -8) (IRONCLAD::M 2 3 -16)
; (IRONCLAD::M 3 2 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 7 -48) (IRONCLAD::M 7 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 0 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 5 0) (IRONCLAD::M 1 4 -8) (IRONCLAD::M 2 3 -16)
; (IRONCLAD::M 3 2 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 7 -48) (IRONCLAD::M 7 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 7 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 5 0) (IRONCLAD::M 1 4 -8) (IRONCLAD::M 2 3 -16)
; (IRONCLAD::M 3 2 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 7 -48) (IRONCLAD::M 7 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 6 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 5 0) (IRONCLAD::M 1 4 -8) (IRONCLAD::M 2 3 -16)
; (IRONCLAD::M 3 2 -24) (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 7 -48) (IRONCLAD::M 7 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::MOD64+ (AREF IRONCLAD::K (+ IRONCLAD::K-START 5))
; (LOGXOR (IRONCLAD::M 0 5 0) (IRONCLAD::M 1 4 -8)
; (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 0 -40)
; (IRONCLAD::M 6 7 -48) (IRONCLAD::M 7 6 -56)))
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 6 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 5 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 6 0) (IRONCLAD::M 1 5 -8) (IRONCLAD::M 2 4 -16)
; (IRONCLAD::M 3 3 -24) (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 4 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 6 0) (IRONCLAD::M 1 5 -8) (IRONCLAD::M 2 4 -16)
; (IRONCLAD::M 3 3 -24) (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 3 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 6 0) (IRONCLAD::M 1 5 -8) (IRONCLAD::M 2 4 -16)
; (IRONCLAD::M 3 3 -24) (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 2 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 6 0) (IRONCLAD::M 1 5 -8) (IRONCLAD::M 2 4 -16)
; (IRONCLAD::M 3 3 -24) (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 1 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 6 0) (IRONCLAD::M 1 5 -8) (IRONCLAD::M 2 4 -16)
; (IRONCLAD::M 3 3 -24) (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 0 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 6 0) (IRONCLAD::M 1 5 -8) (IRONCLAD::M 2 4 -16)
; (IRONCLAD::M 3 3 -24) (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 7 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 6 0) (IRONCLAD::M 1 5 -8) (IRONCLAD::M 2 4 -16)
; (IRONCLAD::M 3 3 -24) (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::MOD64+ (AREF IRONCLAD::K (+ IRONCLAD::K-START 6))
; (LOGXOR (IRONCLAD::M 0 6 0) (IRONCLAD::M 1 5 -8)
; (IRONCLAD::M 2 4 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 1 -40)
; (IRONCLAD::M 6 0 -48) (IRONCLAD::M 7 7 -56)))
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 7 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 6 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 7 0) (IRONCLAD::M 1 6 -8) (IRONCLAD::M 2 5 -16)
; (IRONCLAD::M 3 4 -24) (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 2 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 5 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 7 0) (IRONCLAD::M 1 6 -8) (IRONCLAD::M 2 5 -16)
; (IRONCLAD::M 3 4 -24) (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 2 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 4 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 7 0) (IRONCLAD::M 1 6 -8) (IRONCLAD::M 2 5 -16)
; (IRONCLAD::M 3 4 -24) (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 2 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 3 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 7 0) (IRONCLAD::M 1 6 -8) (IRONCLAD::M 2 5 -16)
; (IRONCLAD::M 3 4 -24) (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 2 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 2 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 7 0) (IRONCLAD::M 1 6 -8) (IRONCLAD::M 2 5 -16)
; (IRONCLAD::M 3 4 -24) (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 2 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 1 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 7 0) (IRONCLAD::M 1 6 -8) (IRONCLAD::M 2 5 -16)
; (IRONCLAD::M 3 4 -24) (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 2 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 0 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 7 0) (IRONCLAD::M 1 6 -8) (IRONCLAD::M 2 5 -16)
; (IRONCLAD::M 3 4 -24) (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 2 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::MOD64+ (AREF IRONCLAD::K (+ IRONCLAD::K-START 7))
; (LOGXOR (IRONCLAD::M 0 7 0) (IRONCLAD::M 1 6 -8)
; (IRONCLAD::M 2 5 -16) (IRONCLAD::M 3 4 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 2 -40)
; (IRONCLAD::M 6 1 -48) (IRONCLAD::M 7 0 -56)))
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; processing (DECLAIM (INLINE KALYNA-IMC512))
; processing (DEFUN KALYNA-IMC512 ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp
; in: DEFUN KALYNA-IMC512
; (IRONCLAD::M 0 0 0 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 1 0 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 1 0 -8) (IRONCLAD::M 2 2 0 -16)
; (IRONCLAD::M 3 3 0 -24) (IRONCLAD::M 4 0 0 -32)
; (IRONCLAD::M 5 1 0 -40) (IRONCLAD::M 6 2 0 -48)
; (IRONCLAD::M 7 3 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 2 0 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 1 0 -8) (IRONCLAD::M 2 2 0 -16)
; (IRONCLAD::M 3 3 0 -24) (IRONCLAD::M 4 0 0 -32)
; (IRONCLAD::M 5 1 0 -40) (IRONCLAD::M 6 2 0 -48)
; (IRONCLAD::M 7 3 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 3 0 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 1 0 -8) (IRONCLAD::M 2 2 0 -16)
; (IRONCLAD::M 3 3 0 -24) (IRONCLAD::M 4 0 0 -32)
; (IRONCLAD::M 5 1 0 -40) (IRONCLAD::M 6 2 0 -48)
; (IRONCLAD::M 7 3 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 0 0 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 1 0 -8) (IRONCLAD::M 2 2 0 -16)
; (IRONCLAD::M 3 3 0 -24) (IRONCLAD::M 4 0 0 -32)
; (IRONCLAD::M 5 1 0 -40) (IRONCLAD::M 6 2 0 -48)
; (IRONCLAD::M 7 3 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 1 0 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 1 0 -8) (IRONCLAD::M 2 2 0 -16)
; (IRONCLAD::M 3 3 0 -24) (IRONCLAD::M 4 0 0 -32)
; (IRONCLAD::M 5 1 0 -40) (IRONCLAD::M 6 2 0 -48)
; (IRONCLAD::M 7 3 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 2 0 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 1 0 -8) (IRONCLAD::M 2 2 0 -16)
; (IRONCLAD::M 3 3 0 -24) (IRONCLAD::M 4 0 0 -32)
; (IRONCLAD::M 5 1 0 -40) (IRONCLAD::M 6 2 0 -48)
; (IRONCLAD::M 7 3 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 3 0 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 1 0 -8) (IRONCLAD::M 2 2 0 -16)
; (IRONCLAD::M 3 3 0 -24) (IRONCLAD::M 4 0 0 -32)
; (IRONCLAD::M 5 1 0 -40) (IRONCLAD::M 6 2 0 -48)
; (IRONCLAD::M 7 3 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 0 1 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 1 1 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 1 0) (IRONCLAD::M 1 1 1 -8) (IRONCLAD::M 2 2 1 -16)
; (IRONCLAD::M 3 3 1 -24) (IRONCLAD::M 4 0 1 -32)
; (IRONCLAD::M 5 1 1 -40) (IRONCLAD::M 6 2 1 -48)
; (IRONCLAD::M 7 3 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 2 1 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 1 0) (IRONCLAD::M 1 1 1 -8) (IRONCLAD::M 2 2 1 -16)
; (IRONCLAD::M 3 3 1 -24) (IRONCLAD::M 4 0 1 -32)
; (IRONCLAD::M 5 1 1 -40) (IRONCLAD::M 6 2 1 -48)
; (IRONCLAD::M 7 3 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 3 1 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 1 0) (IRONCLAD::M 1 1 1 -8) (IRONCLAD::M 2 2 1 -16)
; (IRONCLAD::M 3 3 1 -24) (IRONCLAD::M 4 0 1 -32)
; (IRONCLAD::M 5 1 1 -40) (IRONCLAD::M 6 2 1 -48)
; (IRONCLAD::M 7 3 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 0 1 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 1 0) (IRONCLAD::M 1 1 1 -8) (IRONCLAD::M 2 2 1 -16)
; (IRONCLAD::M 3 3 1 -24) (IRONCLAD::M 4 0 1 -32)
; (IRONCLAD::M 5 1 1 -40) (IRONCLAD::M 6 2 1 -48)
; (IRONCLAD::M 7 3 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 1 1 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 1 0) (IRONCLAD::M 1 1 1 -8) (IRONCLAD::M 2 2 1 -16)
; (IRONCLAD::M 3 3 1 -24) (IRONCLAD::M 4 0 1 -32)
; (IRONCLAD::M 5 1 1 -40) (IRONCLAD::M 6 2 1 -48)
; (IRONCLAD::M 7 3 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 2 1 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 1 0) (IRONCLAD::M 1 1 1 -8) (IRONCLAD::M 2 2 1 -16)
; (IRONCLAD::M 3 3 1 -24) (IRONCLAD::M 4 0 1 -32)
; (IRONCLAD::M 5 1 1 -40) (IRONCLAD::M 6 2 1 -48)
; (IRONCLAD::M 7 3 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 3 1 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 1 0) (IRONCLAD::M 1 1 1 -8) (IRONCLAD::M 2 2 1 -16)
; (IRONCLAD::M 3 3 1 -24) (IRONCLAD::M 4 0 1 -32)
; (IRONCLAD::M 5 1 1 -40) (IRONCLAD::M 6 2 1 -48)
; (IRONCLAD::M 7 3 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 0 2 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 1 2 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 2 0) (IRONCLAD::M 1 1 2 -8) (IRONCLAD::M 2 2 2 -16)
; (IRONCLAD::M 3 3 2 -24) (IRONCLAD::M 4 0 2 -32)
; (IRONCLAD::M 5 1 2 -40) (IRONCLAD::M 6 2 2 -48)
; (IRONCLAD::M 7 3 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 2 2 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 2 0) (IRONCLAD::M 1 1 2 -8) (IRONCLAD::M 2 2 2 -16)
; (IRONCLAD::M 3 3 2 -24) (IRONCLAD::M 4 0 2 -32)
; (IRONCLAD::M 5 1 2 -40) (IRONCLAD::M 6 2 2 -48)
; (IRONCLAD::M 7 3 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 3 2 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 2 0) (IRONCLAD::M 1 1 2 -8) (IRONCLAD::M 2 2 2 -16)
; (IRONCLAD::M 3 3 2 -24) (IRONCLAD::M 4 0 2 -32)
; (IRONCLAD::M 5 1 2 -40) (IRONCLAD::M 6 2 2 -48)
; (IRONCLAD::M 7 3 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 0 2 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 2 0) (IRONCLAD::M 1 1 2 -8) (IRONCLAD::M 2 2 2 -16)
; (IRONCLAD::M 3 3 2 -24) (IRONCLAD::M 4 0 2 -32)
; (IRONCLAD::M 5 1 2 -40) (IRONCLAD::M 6 2 2 -48)
; (IRONCLAD::M 7 3 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 1 2 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 2 0) (IRONCLAD::M 1 1 2 -8) (IRONCLAD::M 2 2 2 -16)
; (IRONCLAD::M 3 3 2 -24) (IRONCLAD::M 4 0 2 -32)
; (IRONCLAD::M 5 1 2 -40) (IRONCLAD::M 6 2 2 -48)
; (IRONCLAD::M 7 3 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 2 2 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 2 0) (IRONCLAD::M 1 1 2 -8) (IRONCLAD::M 2 2 2 -16)
; (IRONCLAD::M 3 3 2 -24) (IRONCLAD::M 4 0 2 -32)
; (IRONCLAD::M 5 1 2 -40) (IRONCLAD::M 6 2 2 -48)
; (IRONCLAD::M 7 3 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 3 2 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 2 0) (IRONCLAD::M 1 1 2 -8) (IRONCLAD::M 2 2 2 -16)
; (IRONCLAD::M 3 3 2 -24) (IRONCLAD::M 4 0 2 -32)
; (IRONCLAD::M 5 1 2 -40) (IRONCLAD::M 6 2 2 -48)
; (IRONCLAD::M 7 3 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 0 3 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 1 3 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 3 0) (IRONCLAD::M 1 1 3 -8) (IRONCLAD::M 2 2 3 -16)
; (IRONCLAD::M 3 3 3 -24) (IRONCLAD::M 4 0 3 -32)
; (IRONCLAD::M 5 1 3 -40) (IRONCLAD::M 6 2 3 -48)
; (IRONCLAD::M 7 3 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 2 3 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 3 0) (IRONCLAD::M 1 1 3 -8) (IRONCLAD::M 2 2 3 -16)
; (IRONCLAD::M 3 3 3 -24) (IRONCLAD::M 4 0 3 -32)
; (IRONCLAD::M 5 1 3 -40) (IRONCLAD::M 6 2 3 -48)
; (IRONCLAD::M 7 3 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 3 3 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 3 0) (IRONCLAD::M 1 1 3 -8) (IRONCLAD::M 2 2 3 -16)
; (IRONCLAD::M 3 3 3 -24) (IRONCLAD::M 4 0 3 -32)
; (IRONCLAD::M 5 1 3 -40) (IRONCLAD::M 6 2 3 -48)
; (IRONCLAD::M 7 3 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 0 3 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 3 0) (IRONCLAD::M 1 1 3 -8) (IRONCLAD::M 2 2 3 -16)
; (IRONCLAD::M 3 3 3 -24) (IRONCLAD::M 4 0 3 -32)
; (IRONCLAD::M 5 1 3 -40) (IRONCLAD::M 6 2 3 -48)
; (IRONCLAD::M 7 3 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 1 3 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 3 0) (IRONCLAD::M 1 1 3 -8) (IRONCLAD::M 2 2 3 -16)
; (IRONCLAD::M 3 3 3 -24) (IRONCLAD::M 4 0 3 -32)
; (IRONCLAD::M 5 1 3 -40) (IRONCLAD::M 6 2 3 -48)
; (IRONCLAD::M 7 3 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 2 3 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 3 0) (IRONCLAD::M 1 1 3 -8) (IRONCLAD::M 2 2 3 -16)
; (IRONCLAD::M 3 3 3 -24) (IRONCLAD::M 4 0 3 -32)
; (IRONCLAD::M 5 1 3 -40) (IRONCLAD::M 6 2 3 -48)
; (IRONCLAD::M 7 3 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 3 3 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 3 0) (IRONCLAD::M 1 1 3 -8) (IRONCLAD::M 2 2 3 -16)
; (IRONCLAD::M 3 3 3 -24) (IRONCLAD::M 4 0 3 -32)
; (IRONCLAD::M 5 1 3 -40) (IRONCLAD::M 6 2 3 -48)
; (IRONCLAD::M 7 3 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 0 4 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 1 4 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 4 0) (IRONCLAD::M 1 1 4 -8) (IRONCLAD::M 2 2 4 -16)
; (IRONCLAD::M 3 3 4 -24) (IRONCLAD::M 4 0 4 -32)
; (IRONCLAD::M 5 1 4 -40) (IRONCLAD::M 6 2 4 -48)
; (IRONCLAD::M 7 3 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 2 4 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 4 0) (IRONCLAD::M 1 1 4 -8) (IRONCLAD::M 2 2 4 -16)
; (IRONCLAD::M 3 3 4 -24) (IRONCLAD::M 4 0 4 -32)
; (IRONCLAD::M 5 1 4 -40) (IRONCLAD::M 6 2 4 -48)
; (IRONCLAD::M 7 3 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 3 4 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 4 0) (IRONCLAD::M 1 1 4 -8) (IRONCLAD::M 2 2 4 -16)
; (IRONCLAD::M 3 3 4 -24) (IRONCLAD::M 4 0 4 -32)
; (IRONCLAD::M 5 1 4 -40) (IRONCLAD::M 6 2 4 -48)
; (IRONCLAD::M 7 3 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 0 4 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 4 0) (IRONCLAD::M 1 1 4 -8) (IRONCLAD::M 2 2 4 -16)
; (IRONCLAD::M 3 3 4 -24) (IRONCLAD::M 4 0 4 -32)
; (IRONCLAD::M 5 1 4 -40) (IRONCLAD::M 6 2 4 -48)
; (IRONCLAD::M 7 3 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 1 4 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 4 0) (IRONCLAD::M 1 1 4 -8) (IRONCLAD::M 2 2 4 -16)
; (IRONCLAD::M 3 3 4 -24) (IRONCLAD::M 4 0 4 -32)
; (IRONCLAD::M 5 1 4 -40) (IRONCLAD::M 6 2 4 -48)
; (IRONCLAD::M 7 3 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 2 4 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 4 0) (IRONCLAD::M 1 1 4 -8) (IRONCLAD::M 2 2 4 -16)
; (IRONCLAD::M 3 3 4 -24) (IRONCLAD::M 4 0 4 -32)
; (IRONCLAD::M 5 1 4 -40) (IRONCLAD::M 6 2 4 -48)
; (IRONCLAD::M 7 3 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 3 4 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 4 0) (IRONCLAD::M 1 1 4 -8) (IRONCLAD::M 2 2 4 -16)
; (IRONCLAD::M 3 3 4 -24) (IRONCLAD::M 4 0 4 -32)
; (IRONCLAD::M 5 1 4 -40) (IRONCLAD::M 6 2 4 -48)
; (IRONCLAD::M 7 3 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 0 5 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 1 5 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 5 0) (IRONCLAD::M 1 1 5 -8) (IRONCLAD::M 2 2 5 -16)
; (IRONCLAD::M 3 3 5 -24) (IRONCLAD::M 4 0 5 -32)
; (IRONCLAD::M 5 1 5 -40) (IRONCLAD::M 6 2 5 -48)
; (IRONCLAD::M 7 3 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 2 5 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 5 0) (IRONCLAD::M 1 1 5 -8) (IRONCLAD::M 2 2 5 -16)
; (IRONCLAD::M 3 3 5 -24) (IRONCLAD::M 4 0 5 -32)
; (IRONCLAD::M 5 1 5 -40) (IRONCLAD::M 6 2 5 -48)
; (IRONCLAD::M 7 3 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 3 5 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 5 0) (IRONCLAD::M 1 1 5 -8) (IRONCLAD::M 2 2 5 -16)
; (IRONCLAD::M 3 3 5 -24) (IRONCLAD::M 4 0 5 -32)
; (IRONCLAD::M 5 1 5 -40) (IRONCLAD::M 6 2 5 -48)
; (IRONCLAD::M 7 3 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 0 5 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 5 0) (IRONCLAD::M 1 1 5 -8) (IRONCLAD::M 2 2 5 -16)
; (IRONCLAD::M 3 3 5 -24) (IRONCLAD::M 4 0 5 -32)
; (IRONCLAD::M 5 1 5 -40) (IRONCLAD::M 6 2 5 -48)
; (IRONCLAD::M 7 3 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 1 5 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 5 0) (IRONCLAD::M 1 1 5 -8) (IRONCLAD::M 2 2 5 -16)
; (IRONCLAD::M 3 3 5 -24) (IRONCLAD::M 4 0 5 -32)
; (IRONCLAD::M 5 1 5 -40) (IRONCLAD::M 6 2 5 -48)
; (IRONCLAD::M 7 3 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 2 5 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 5 0) (IRONCLAD::M 1 1 5 -8) (IRONCLAD::M 2 2 5 -16)
; (IRONCLAD::M 3 3 5 -24) (IRONCLAD::M 4 0 5 -32)
; (IRONCLAD::M 5 1 5 -40) (IRONCLAD::M 6 2 5 -48)
; (IRONCLAD::M 7 3 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 3 5 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 5 0) (IRONCLAD::M 1 1 5 -8) (IRONCLAD::M 2 2 5 -16)
; (IRONCLAD::M 3 3 5 -24) (IRONCLAD::M 4 0 5 -32)
; (IRONCLAD::M 5 1 5 -40) (IRONCLAD::M 6 2 5 -48)
; (IRONCLAD::M 7 3 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 0 6 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 1 6 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 6 0) (IRONCLAD::M 1 1 6 -8) (IRONCLAD::M 2 2 6 -16)
; (IRONCLAD::M 3 3 6 -24) (IRONCLAD::M 4 0 6 -32)
; (IRONCLAD::M 5 1 6 -40) (IRONCLAD::M 6 2 6 -48)
; (IRONCLAD::M 7 3 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 2 6 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 6 0) (IRONCLAD::M 1 1 6 -8) (IRONCLAD::M 2 2 6 -16)
; (IRONCLAD::M 3 3 6 -24) (IRONCLAD::M 4 0 6 -32)
; (IRONCLAD::M 5 1 6 -40) (IRONCLAD::M 6 2 6 -48)
; (IRONCLAD::M 7 3 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 3 6 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 6 0) (IRONCLAD::M 1 1 6 -8) (IRONCLAD::M 2 2 6 -16)
; (IRONCLAD::M 3 3 6 -24) (IRONCLAD::M 4 0 6 -32)
; (IRONCLAD::M 5 1 6 -40) (IRONCLAD::M 6 2 6 -48)
; (IRONCLAD::M 7 3 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 0 6 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 6 0) (IRONCLAD::M 1 1 6 -8) (IRONCLAD::M 2 2 6 -16)
; (IRONCLAD::M 3 3 6 -24) (IRONCLAD::M 4 0 6 -32)
; (IRONCLAD::M 5 1 6 -40) (IRONCLAD::M 6 2 6 -48)
; (IRONCLAD::M 7 3 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 1 6 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 6 0) (IRONCLAD::M 1 1 6 -8) (IRONCLAD::M 2 2 6 -16)
; (IRONCLAD::M 3 3 6 -24) (IRONCLAD::M 4 0 6 -32)
; (IRONCLAD::M 5 1 6 -40) (IRONCLAD::M 6 2 6 -48)
; (IRONCLAD::M 7 3 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 2 6 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 6 0) (IRONCLAD::M 1 1 6 -8) (IRONCLAD::M 2 2 6 -16)
; (IRONCLAD::M 3 3 6 -24) (IRONCLAD::M 4 0 6 -32)
; (IRONCLAD::M 5 1 6 -40) (IRONCLAD::M 6 2 6 -48)
; (IRONCLAD::M 7 3 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 3 6 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 6 0) (IRONCLAD::M 1 1 6 -8) (IRONCLAD::M 2 2 6 -16)
; (IRONCLAD::M 3 3 6 -24) (IRONCLAD::M 4 0 6 -32)
; (IRONCLAD::M 5 1 6 -40) (IRONCLAD::M 6 2 6 -48)
; (IRONCLAD::M 7 3 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 0 7 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 1 7 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 7 0) (IRONCLAD::M 1 1 7 -8) (IRONCLAD::M 2 2 7 -16)
; (IRONCLAD::M 3 3 7 -24) (IRONCLAD::M 4 0 7 -32)
; (IRONCLAD::M 5 1 7 -40) (IRONCLAD::M 6 2 7 -48)
; (IRONCLAD::M 7 3 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 2 7 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 7 0) (IRONCLAD::M 1 1 7 -8) (IRONCLAD::M 2 2 7 -16)
; (IRONCLAD::M 3 3 7 -24) (IRONCLAD::M 4 0 7 -32)
; (IRONCLAD::M 5 1 7 -40) (IRONCLAD::M 6 2 7 -48)
; (IRONCLAD::M 7 3 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 3 7 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 7 0) (IRONCLAD::M 1 1 7 -8) (IRONCLAD::M 2 2 7 -16)
; (IRONCLAD::M 3 3 7 -24) (IRONCLAD::M 4 0 7 -32)
; (IRONCLAD::M 5 1 7 -40) (IRONCLAD::M 6 2 7 -48)
; (IRONCLAD::M 7 3 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 0 7 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 7 0) (IRONCLAD::M 1 1 7 -8) (IRONCLAD::M 2 2 7 -16)
; (IRONCLAD::M 3 3 7 -24) (IRONCLAD::M 4 0 7 -32)
; (IRONCLAD::M 5 1 7 -40) (IRONCLAD::M 6 2 7 -48)
; (IRONCLAD::M 7 3 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 1 7 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 7 0) (IRONCLAD::M 1 1 7 -8) (IRONCLAD::M 2 2 7 -16)
; (IRONCLAD::M 3 3 7 -24) (IRONCLAD::M 4 0 7 -32)
; (IRONCLAD::M 5 1 7 -40) (IRONCLAD::M 6 2 7 -48)
; (IRONCLAD::M 7 3 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 2 7 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 7 0) (IRONCLAD::M 1 1 7 -8) (IRONCLAD::M 2 2 7 -16)
; (IRONCLAD::M 3 3 7 -24) (IRONCLAD::M 4 0 7 -32)
; (IRONCLAD::M 5 1 7 -40) (IRONCLAD::M 6 2 7 -48)
; (IRONCLAD::M 7 3 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 3 7 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 7 0) (IRONCLAD::M 1 1 7 -8) (IRONCLAD::M 2 2 7 -16)
; (IRONCLAD::M 3 3 7 -24) (IRONCLAD::M 4 0 7 -32)
; (IRONCLAD::M 5 1 7 -40) (IRONCLAD::M 6 2 7 -48)
; (IRONCLAD::M 7 3 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; processing (DECLAIM (INLINE KALYNA-IG512))
; processing (DEFUN KALYNA-IG512 ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp
; in: DEFUN KALYNA-IG512
; (IRONCLAD::M 0 0 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 4 -32) (IRONCLAD::M 5 5 -40) (IRONCLAD::M 6 6 -48)
; (IRONCLAD::M 7 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 1 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 4 -32) (IRONCLAD::M 5 5 -40) (IRONCLAD::M 6 6 -48)
; (IRONCLAD::M 7 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 2 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 4 -32) (IRONCLAD::M 5 5 -40) (IRONCLAD::M 6 6 -48)
; (IRONCLAD::M 7 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 3 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 4 -32) (IRONCLAD::M 5 5 -40) (IRONCLAD::M 6 6 -48)
; (IRONCLAD::M 7 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 4 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 4 -32) (IRONCLAD::M 5 5 -40) (IRONCLAD::M 6 6 -48)
; (IRONCLAD::M 7 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 5 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 4 -32) (IRONCLAD::M 5 5 -40) (IRONCLAD::M 6 6 -48)
; (IRONCLAD::M 7 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 6 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 4 -32) (IRONCLAD::M 5 5 -40) (IRONCLAD::M 6 6 -48)
; (IRONCLAD::M 7 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 7 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 4 -32) (IRONCLAD::M 5 5 -40) (IRONCLAD::M 6 6 -48)
; (IRONCLAD::M 7 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 1 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 4 -24)
; (IRONCLAD::M 4 5 -32) (IRONCLAD::M 5 6 -40) (IRONCLAD::M 6 7 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 2 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 4 -24)
; (IRONCLAD::M 4 5 -32) (IRONCLAD::M 5 6 -40) (IRONCLAD::M 6 7 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 3 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 4 -24)
; (IRONCLAD::M 4 5 -32) (IRONCLAD::M 5 6 -40) (IRONCLAD::M 6 7 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 4 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 4 -24)
; (IRONCLAD::M 4 5 -32) (IRONCLAD::M 5 6 -40) (IRONCLAD::M 6 7 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 5 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 4 -24)
; (IRONCLAD::M 4 5 -32) (IRONCLAD::M 5 6 -40) (IRONCLAD::M 6 7 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 6 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 4 -24)
; (IRONCLAD::M 4 5 -32) (IRONCLAD::M 5 6 -40) (IRONCLAD::M 6 7 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 7 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 4 -24)
; (IRONCLAD::M 4 5 -32) (IRONCLAD::M 5 6 -40) (IRONCLAD::M 6 7 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 0 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 4 -24)
; (IRONCLAD::M 4 5 -32) (IRONCLAD::M 5 6 -40) (IRONCLAD::M 6 7 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 2 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)) (IRONCLAD::M 0 2 0)
; (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 4 -16) (IRONCLAD::M 3 5 -24)
; (IRONCLAD::M 4 6 -32) (IRONCLAD::M 5 7 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 3 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)) (IRONCLAD::M 0 2 0)
; (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 4 -16) (IRONCLAD::M 3 5 -24)
; (IRONCLAD::M 4 6 -32) (IRONCLAD::M 5 7 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 4 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)) (IRONCLAD::M 0 2 0)
; (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 4 -16) (IRONCLAD::M 3 5 -24)
; (IRONCLAD::M 4 6 -32) (IRONCLAD::M 5 7 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 5 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)) (IRONCLAD::M 0 2 0)
; (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 4 -16) (IRONCLAD::M 3 5 -24)
; (IRONCLAD::M 4 6 -32) (IRONCLAD::M 5 7 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 6 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)) (IRONCLAD::M 0 2 0)
; (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 4 -16) (IRONCLAD::M 3 5 -24)
; (IRONCLAD::M 4 6 -32) (IRONCLAD::M 5 7 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 7 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)) (IRONCLAD::M 0 2 0)
; (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 4 -16) (IRONCLAD::M 3 5 -24)
; (IRONCLAD::M 4 6 -32) (IRONCLAD::M 5 7 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 0 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)) (IRONCLAD::M 0 2 0)
; (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 4 -16) (IRONCLAD::M 3 5 -24)
; (IRONCLAD::M 4 6 -32) (IRONCLAD::M 5 7 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 1 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)) (IRONCLAD::M 0 2 0)
; (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 4 -16) (IRONCLAD::M 3 5 -24)
; (IRONCLAD::M 4 6 -32) (IRONCLAD::M 5 7 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 3 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)) (IRONCLAD::M 0 3 0)
; (IRONCLAD::M 1 4 -8) (IRONCLAD::M 2 5 -16) (IRONCLAD::M 3 6 -24)
; (IRONCLAD::M 4 7 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 4 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)) (IRONCLAD::M 0 3 0)
; (IRONCLAD::M 1 4 -8) (IRONCLAD::M 2 5 -16) (IRONCLAD::M 3 6 -24)
; (IRONCLAD::M 4 7 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 5 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)) (IRONCLAD::M 0 3 0)
; (IRONCLAD::M 1 4 -8) (IRONCLAD::M 2 5 -16) (IRONCLAD::M 3 6 -24)
; (IRONCLAD::M 4 7 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 6 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)) (IRONCLAD::M 0 3 0)
; (IRONCLAD::M 1 4 -8) (IRONCLAD::M 2 5 -16) (IRONCLAD::M 3 6 -24)
; (IRONCLAD::M 4 7 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 7 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)) (IRONCLAD::M 0 3 0)
; (IRONCLAD::M 1 4 -8) (IRONCLAD::M 2 5 -16) (IRONCLAD::M 3 6 -24)
; (IRONCLAD::M 4 7 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 0 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)) (IRONCLAD::M 0 3 0)
; (IRONCLAD::M 1 4 -8) (IRONCLAD::M 2 5 -16) (IRONCLAD::M 3 6 -24)
; (IRONCLAD::M 4 7 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 1 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)) (IRONCLAD::M 0 3 0)
; (IRONCLAD::M 1 4 -8) (IRONCLAD::M 2 5 -16) (IRONCLAD::M 3 6 -24)
; (IRONCLAD::M 4 7 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 2 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)) (IRONCLAD::M 0 3 0)
; (IRONCLAD::M 1 4 -8) (IRONCLAD::M 2 5 -16) (IRONCLAD::M 3 6 -24)
; (IRONCLAD::M 4 7 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 4 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 4)) (IRONCLAD::M 0 4 0)
; (IRONCLAD::M 1 5 -8) (IRONCLAD::M 2 6 -16) (IRONCLAD::M 3 7 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 2 -48)
; (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 5 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 4)) (IRONCLAD::M 0 4 0)
; (IRONCLAD::M 1 5 -8) (IRONCLAD::M 2 6 -16) (IRONCLAD::M 3 7 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 2 -48)
; (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 6 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 4)) (IRONCLAD::M 0 4 0)
; (IRONCLAD::M 1 5 -8) (IRONCLAD::M 2 6 -16) (IRONCLAD::M 3 7 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 2 -48)
; (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 7 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 4)) (IRONCLAD::M 0 4 0)
; (IRONCLAD::M 1 5 -8) (IRONCLAD::M 2 6 -16) (IRONCLAD::M 3 7 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 2 -48)
; (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 0 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 4)) (IRONCLAD::M 0 4 0)
; (IRONCLAD::M 1 5 -8) (IRONCLAD::M 2 6 -16) (IRONCLAD::M 3 7 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 2 -48)
; (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 1 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 4)) (IRONCLAD::M 0 4 0)
; (IRONCLAD::M 1 5 -8) (IRONCLAD::M 2 6 -16) (IRONCLAD::M 3 7 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 2 -48)
; (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 2 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 4)) (IRONCLAD::M 0 4 0)
; (IRONCLAD::M 1 5 -8) (IRONCLAD::M 2 6 -16) (IRONCLAD::M 3 7 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 2 -48)
; (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 3 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 4)) (IRONCLAD::M 0 4 0)
; (IRONCLAD::M 1 5 -8) (IRONCLAD::M 2 6 -16) (IRONCLAD::M 3 7 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 2 -48)
; (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 5 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 5)) (IRONCLAD::M 0 5 0)
; (IRONCLAD::M 1 6 -8) (IRONCLAD::M 2 7 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 2 -40) (IRONCLAD::M 6 3 -48)
; (IRONCLAD::M 7 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 6 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 5)) (IRONCLAD::M 0 5 0)
; (IRONCLAD::M 1 6 -8) (IRONCLAD::M 2 7 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 2 -40) (IRONCLAD::M 6 3 -48)
; (IRONCLAD::M 7 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 7 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 5)) (IRONCLAD::M 0 5 0)
; (IRONCLAD::M 1 6 -8) (IRONCLAD::M 2 7 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 2 -40) (IRONCLAD::M 6 3 -48)
; (IRONCLAD::M 7 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 0 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 5)) (IRONCLAD::M 0 5 0)
; (IRONCLAD::M 1 6 -8) (IRONCLAD::M 2 7 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 2 -40) (IRONCLAD::M 6 3 -48)
; (IRONCLAD::M 7 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 1 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 5)) (IRONCLAD::M 0 5 0)
; (IRONCLAD::M 1 6 -8) (IRONCLAD::M 2 7 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 2 -40) (IRONCLAD::M 6 3 -48)
; (IRONCLAD::M 7 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 2 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 5)) (IRONCLAD::M 0 5 0)
; (IRONCLAD::M 1 6 -8) (IRONCLAD::M 2 7 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 2 -40) (IRONCLAD::M 6 3 -48)
; (IRONCLAD::M 7 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 3 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 5)) (IRONCLAD::M 0 5 0)
; (IRONCLAD::M 1 6 -8) (IRONCLAD::M 2 7 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 2 -40) (IRONCLAD::M 6 3 -48)
; (IRONCLAD::M 7 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 4 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 5)) (IRONCLAD::M 0 5 0)
; (IRONCLAD::M 1 6 -8) (IRONCLAD::M 2 7 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 2 -40) (IRONCLAD::M 6 3 -48)
; (IRONCLAD::M 7 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 6 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 6)) (IRONCLAD::M 0 6 0)
; (IRONCLAD::M 1 7 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 3 -40) (IRONCLAD::M 6 4 -48)
; (IRONCLAD::M 7 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 7 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 6)) (IRONCLAD::M 0 6 0)
; (IRONCLAD::M 1 7 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 3 -40) (IRONCLAD::M 6 4 -48)
; (IRONCLAD::M 7 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 0 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 6)) (IRONCLAD::M 0 6 0)
; (IRONCLAD::M 1 7 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 3 -40) (IRONCLAD::M 6 4 -48)
; (IRONCLAD::M 7 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 1 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 6)) (IRONCLAD::M 0 6 0)
; (IRONCLAD::M 1 7 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 3 -40) (IRONCLAD::M 6 4 -48)
; (IRONCLAD::M 7 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 2 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 6)) (IRONCLAD::M 0 6 0)
; (IRONCLAD::M 1 7 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 3 -40) (IRONCLAD::M 6 4 -48)
; (IRONCLAD::M 7 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 3 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 6)) (IRONCLAD::M 0 6 0)
; (IRONCLAD::M 1 7 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 3 -40) (IRONCLAD::M 6 4 -48)
; (IRONCLAD::M 7 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 4 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 6)) (IRONCLAD::M 0 6 0)
; (IRONCLAD::M 1 7 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 3 -40) (IRONCLAD::M 6 4 -48)
; (IRONCLAD::M 7 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 5 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 6)) (IRONCLAD::M 0 6 0)
; (IRONCLAD::M 1 7 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 3 -40) (IRONCLAD::M 6 4 -48)
; (IRONCLAD::M 7 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 7 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 7)) (IRONCLAD::M 0 7 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 4 -40) (IRONCLAD::M 6 5 -48)
; (IRONCLAD::M 7 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 0 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 7)) (IRONCLAD::M 0 7 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 4 -40) (IRONCLAD::M 6 5 -48)
; (IRONCLAD::M 7 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 1 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 7)) (IRONCLAD::M 0 7 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 4 -40) (IRONCLAD::M 6 5 -48)
; (IRONCLAD::M 7 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 2 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 7)) (IRONCLAD::M 0 7 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 4 -40) (IRONCLAD::M 6 5 -48)
; (IRONCLAD::M 7 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 3 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 7)) (IRONCLAD::M 0 7 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 4 -40) (IRONCLAD::M 6 5 -48)
; (IRONCLAD::M 7 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 4 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 7)) (IRONCLAD::M 0 7 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 4 -40) (IRONCLAD::M 6 5 -48)
; (IRONCLAD::M 7 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 5 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 7)) (IRONCLAD::M 0 7 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 4 -40) (IRONCLAD::M 6 5 -48)
; (IRONCLAD::M 7 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 6 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 7)) (IRONCLAD::M 0 7 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 4 -40) (IRONCLAD::M 6 5 -48)
; (IRONCLAD::M 7 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; processing (DECLAIM (INLINE KALYNA-IGL512))
; processing (DEFUN KALYNA-IGL512 ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp
; in: DEFUN KALYNA-IGL512
; (IRONCLAD::MOD64-
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 1 -8 8)
; (IRONCLAD::M 2 2 -16 16) (IRONCLAD::M 3 3 -24 24)
; (IRONCLAD::M 0 4 -32 32) (IRONCLAD::M 1 5 -40 40)
; (IRONCLAD::M 2 6 -48 48) (IRONCLAD::M 3 7 -56 56))
; (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)))
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::MOD64-
; (LOGXOR (IRONCLAD::M 0 1 0 0) (IRONCLAD::M 1 2 -8 8)
; (IRONCLAD::M 2 3 -16 16) (IRONCLAD::M 3 4 -24 24)
; (IRONCLAD::M 0 5 -32 32) (IRONCLAD::M 1 6 -40 40)
; (IRONCLAD::M 2 7 -48 48) (IRONCLAD::M 3 0 -56 56))
; (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)))
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::MOD64-
; (LOGXOR (IRONCLAD::M 0 2 0 0) (IRONCLAD::M 1 3 -8 8)
; (IRONCLAD::M 2 4 -16 16) (IRONCLAD::M 3 5 -24 24)
; (IRONCLAD::M 0 6 -32 32) (IRONCLAD::M 1 7 -40 40)
; (IRONCLAD::M 2 0 -48 48) (IRONCLAD::M 3 1 -56 56))
; (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)))
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::MOD64-
; (LOGXOR (IRONCLAD::M 0 3 0 0) (IRONCLAD::M 1 4 -8 8)
; (IRONCLAD::M 2 5 -16 16) (IRONCLAD::M 3 6 -24 24)
; (IRONCLAD::M 0 7 -32 32) (IRONCLAD::M 1 0 -40 40)
; (IRONCLAD::M 2 1 -48 48) (IRONCLAD::M 3 2 -56 56))
; (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)))
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::MOD64-
; (LOGXOR (IRONCLAD::M 0 4 0 0) (IRONCLAD::M 1 5 -8 8)
; (IRONCLAD::M 2 6 -16 16) (IRONCLAD::M 3 7 -24 24)
; (IRONCLAD::M 0 0 -32 32) (IRONCLAD::M 1 1 -40 40)
; (IRONCLAD::M 2 2 -48 48) (IRONCLAD::M 3 3 -56 56))
; (AREF IRONCLAD::K (+ IRONCLAD::K-START 4)))
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::MOD64-
; (LOGXOR (IRONCLAD::M 0 5 0 0) (IRONCLAD::M 1 6 -8 8)
; (IRONCLAD::M 2 7 -16 16) (IRONCLAD::M 3 0 -24 24)
; (IRONCLAD::M 0 1 -32 32) (IRONCLAD::M 1 2 -40 40)
; (IRONCLAD::M 2 3 -48 48) (IRONCLAD::M 3 4 -56 56))
; (AREF IRONCLAD::K (+ IRONCLAD::K-START 5)))
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::MOD64-
; (LOGXOR (IRONCLAD::M 0 6 0 0) (IRONCLAD::M 1 7 -8 8)
; (IRONCLAD::M 2 0 -16 16) (IRONCLAD::M 3 1 -24 24)
; (IRONCLAD::M 0 2 -32 32) (IRONCLAD::M 1 3 -40 40)
; (IRONCLAD::M 2 4 -48 48) (IRONCLAD::M 3 5 -56 56))
; (AREF IRONCLAD::K (+ IRONCLAD::K-START 6)))
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::MOD64-
; (LOGXOR (IRONCLAD::M 0 7 0 0) (IRONCLAD::M 1 0 -8 8)
; (IRONCLAD::M 2 1 -16 16) (IRONCLAD::M 3 2 -24 24)
; (IRONCLAD::M 0 3 -32 32) (IRONCLAD::M 1 4 -40 40)
; (IRONCLAD::M 2 5 -48 48) (IRONCLAD::M 3 6 -56 56))
; (AREF IRONCLAD::K (+ IRONCLAD::K-START 7)))
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::M 0 0 0 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 1 -8 8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 2 2 -16 16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 3 3 -24 24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 0 4 -32 32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 1095216660481) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 1095216660481) . #2#), not a (VALUES FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 1 -8 8) (IRONCLAD::M 2 2 -16 16)
; (IRONCLAD::M 3 3 -24 24) (IRONCLAD::M 0 4 -32 32)
; (IRONCLAD::M 1 5 -40 40) (IRONCLAD::M 2 6 -48 48)
; (IRONCLAD::M 3 7 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
; The second argument is a (MOD 1095216660481), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The second argument is a (MOD 1095216660481), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 5 -40 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 280375465082881) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 280375465082881) . #2#), not a (VALUES
; FIXNUM &REST
; T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 1 -8 8) (IRONCLAD::M 2 2 -16 16)
; (IRONCLAD::M 3 3 -24 24) (IRONCLAD::M 0 4 -32 32)
; (IRONCLAD::M 1 5 -40 40) (IRONCLAD::M 2 6 -48 48)
; (IRONCLAD::M 3 7 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The second argument is a (MOD 280375465082881), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 280375465082881), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 6 -48 48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 71776119061217281) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 71776119061217281) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 1 -8 8) (IRONCLAD::M 2 2 -16 16)
; (IRONCLAD::M 3 3 -24 24) (IRONCLAD::M 0 4 -32 32)
; (IRONCLAD::M 1 5 -40 40) (IRONCLAD::M 2 6 -48 48)
; (IRONCLAD::M 3 7 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; The second argument is a (MOD 71776119061217281), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 71776119061217281), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 7 -56 56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 1 -8 8) (IRONCLAD::M 2 2 -16 16)
; (IRONCLAD::M 3 3 -24 24) (IRONCLAD::M 0 4 -32 32)
; (IRONCLAD::M 1 5 -40 40) (IRONCLAD::M 2 6 -48 48)
; (IRONCLAD::M 3 7 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; The second argument is a (MOD 18374686479671623681), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 18374686479671623681), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::MOD64-
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 1 -8 8)
; (IRONCLAD::M 2 2 -16 16) (IRONCLAD::M 3 3 -24 24)
; (IRONCLAD::M 0 4 -32 32) (IRONCLAD::M 1 5 -40 40)
; (IRONCLAD::M 2 6 -48 48) (IRONCLAD::M 3 7 -56 56))
; (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)))
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1#), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
; etc.
; (IRONCLAD::M 0 1 0 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 2 -8 8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 2 3 -16 16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 3 4 -24 24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 0 5 -32 32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 1095216660481) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 1095216660481) . #2#), not a (VALUES FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0 0) (IRONCLAD::M 1 2 -8 8) (IRONCLAD::M 2 3 -16 16)
; (IRONCLAD::M 3 4 -24 24) (IRONCLAD::M 0 5 -32 32)
; (IRONCLAD::M 1 6 -40 40) (IRONCLAD::M 2 7 -48 48)
; (IRONCLAD::M 3 0 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
; The second argument is a (MOD 1095216660481), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The second argument is a (MOD 1095216660481), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 6 -40 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 280375465082881) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 280375465082881) . #2#), not a (VALUES
; FIXNUM &REST
; T).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0 0) (IRONCLAD::M 1 2 -8 8) (IRONCLAD::M 2 3 -16 16)
; (IRONCLAD::M 3 4 -24 24) (IRONCLAD::M 0 5 -32 32)
; (IRONCLAD::M 1 6 -40 40) (IRONCLAD::M 2 7 -48 48)
; (IRONCLAD::M 3 0 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The second argument is a (MOD 280375465082881), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 280375465082881), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 7 -48 48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 71776119061217281) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 71776119061217281) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0 0) (IRONCLAD::M 1 2 -8 8) (IRONCLAD::M 2 3 -16 16)
; (IRONCLAD::M 3 4 -24 24) (IRONCLAD::M 0 5 -32 32)
; (IRONCLAD::M 1 6 -40 40) (IRONCLAD::M 2 7 -48 48)
; (IRONCLAD::M 3 0 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; The second argument is a (MOD 71776119061217281), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 71776119061217281), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 0 -56 56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 1 0 0) (IRONCLAD::M 1 2 -8 8) (IRONCLAD::M 2 3 -16 16)
; (IRONCLAD::M 3 4 -24 24) (IRONCLAD::M 0 5 -32 32)
; (IRONCLAD::M 1 6 -40 40) (IRONCLAD::M 2 7 -48 48)
; (IRONCLAD::M 3 0 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; The second argument is a (MOD 18374686479671623681), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 18374686479671623681), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::MOD64-
; (LOGXOR (IRONCLAD::M 0 1 0 0) (IRONCLAD::M 1 2 -8 8)
; (IRONCLAD::M 2 3 -16 16) (IRONCLAD::M 3 4 -24 24)
; (IRONCLAD::M 0 5 -32 32) (IRONCLAD::M 1 6 -40 40)
; (IRONCLAD::M 2 7 -48 48) (IRONCLAD::M 3 0 -56 56))
; (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)))
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1#), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
; etc.
; (IRONCLAD::M 0 2 0 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 3 -8 8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 2 4 -16 16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 3 5 -24 24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 0 6 -32 32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 1095216660481) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 1095216660481) . #2#), not a (VALUES FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0 0) (IRONCLAD::M 1 3 -8 8) (IRONCLAD::M 2 4 -16 16)
; (IRONCLAD::M 3 5 -24 24) (IRONCLAD::M 0 6 -32 32)
; (IRONCLAD::M 1 7 -40 40) (IRONCLAD::M 2 0 -48 48)
; (IRONCLAD::M 3 1 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
; The second argument is a (MOD 1095216660481), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The second argument is a (MOD 1095216660481), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 7 -40 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 280375465082881) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 280375465082881) . #2#), not a (VALUES
; FIXNUM &REST
; T).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0 0) (IRONCLAD::M 1 3 -8 8) (IRONCLAD::M 2 4 -16 16)
; (IRONCLAD::M 3 5 -24 24) (IRONCLAD::M 0 6 -32 32)
; (IRONCLAD::M 1 7 -40 40) (IRONCLAD::M 2 0 -48 48)
; (IRONCLAD::M 3 1 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The second argument is a (MOD 280375465082881), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 280375465082881), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 0 -48 48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 71776119061217281) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 71776119061217281) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0 0) (IRONCLAD::M 1 3 -8 8) (IRONCLAD::M 2 4 -16 16)
; (IRONCLAD::M 3 5 -24 24) (IRONCLAD::M 0 6 -32 32)
; (IRONCLAD::M 1 7 -40 40) (IRONCLAD::M 2 0 -48 48)
; (IRONCLAD::M 3 1 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; The second argument is a (MOD 71776119061217281), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 71776119061217281), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 1 -56 56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 2 0 0) (IRONCLAD::M 1 3 -8 8) (IRONCLAD::M 2 4 -16 16)
; (IRONCLAD::M 3 5 -24 24) (IRONCLAD::M 0 6 -32 32)
; (IRONCLAD::M 1 7 -40 40) (IRONCLAD::M 2 0 -48 48)
; (IRONCLAD::M 3 1 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; The second argument is a (MOD 18374686479671623681), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 18374686479671623681), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::MOD64-
; (LOGXOR (IRONCLAD::M 0 2 0 0) (IRONCLAD::M 1 3 -8 8)
; (IRONCLAD::M 2 4 -16 16) (IRONCLAD::M 3 5 -24 24)
; (IRONCLAD::M 0 6 -32 32) (IRONCLAD::M 1 7 -40 40)
; (IRONCLAD::M 2 0 -48 48) (IRONCLAD::M 3 1 -56 56))
; (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)))
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1#), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
; etc.
; (IRONCLAD::M 0 3 0 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 4 -8 8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 2 5 -16 16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 3 6 -24 24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 0 7 -32 32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 1095216660481) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 1095216660481) . #2#), not a (VALUES FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0 0) (IRONCLAD::M 1 4 -8 8) (IRONCLAD::M 2 5 -16 16)
; (IRONCLAD::M 3 6 -24 24) (IRONCLAD::M 0 7 -32 32)
; (IRONCLAD::M 1 0 -40 40) (IRONCLAD::M 2 1 -48 48)
; (IRONCLAD::M 3 2 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
; The second argument is a (MOD 1095216660481), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The second argument is a (MOD 1095216660481), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 0 -40 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 280375465082881) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 280375465082881) . #2#), not a (VALUES
; FIXNUM &REST
; T).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0 0) (IRONCLAD::M 1 4 -8 8) (IRONCLAD::M 2 5 -16 16)
; (IRONCLAD::M 3 6 -24 24) (IRONCLAD::M 0 7 -32 32)
; (IRONCLAD::M 1 0 -40 40) (IRONCLAD::M 2 1 -48 48)
; (IRONCLAD::M 3 2 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The second argument is a (MOD 280375465082881), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 280375465082881), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 1 -48 48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 71776119061217281) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 71776119061217281) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0 0) (IRONCLAD::M 1 4 -8 8) (IRONCLAD::M 2 5 -16 16)
; (IRONCLAD::M 3 6 -24 24) (IRONCLAD::M 0 7 -32 32)
; (IRONCLAD::M 1 0 -40 40) (IRONCLAD::M 2 1 -48 48)
; (IRONCLAD::M 3 2 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; The second argument is a (MOD 71776119061217281), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 71776119061217281), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 2 -56 56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 3 0 0) (IRONCLAD::M 1 4 -8 8) (IRONCLAD::M 2 5 -16 16)
; (IRONCLAD::M 3 6 -24 24) (IRONCLAD::M 0 7 -32 32)
; (IRONCLAD::M 1 0 -40 40) (IRONCLAD::M 2 1 -48 48)
; (IRONCLAD::M 3 2 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; The second argument is a (MOD 18374686479671623681), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 18374686479671623681), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::MOD64-
; (LOGXOR (IRONCLAD::M 0 3 0 0) (IRONCLAD::M 1 4 -8 8)
; (IRONCLAD::M 2 5 -16 16) (IRONCLAD::M 3 6 -24 24)
; (IRONCLAD::M 0 7 -32 32) (IRONCLAD::M 1 0 -40 40)
; (IRONCLAD::M 2 1 -48 48) (IRONCLAD::M 3 2 -56 56))
; (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)))
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1#), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
; etc.
; (IRONCLAD::M 0 4 0 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 5 -8 8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 2 6 -16 16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 3 7 -24 24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 0 0 -32 32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 1095216660481) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 1095216660481) . #2#), not a (VALUES FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 4 0 0) (IRONCLAD::M 1 5 -8 8) (IRONCLAD::M 2 6 -16 16)
; (IRONCLAD::M 3 7 -24 24) (IRONCLAD::M 0 0 -32 32)
; (IRONCLAD::M 1 1 -40 40) (IRONCLAD::M 2 2 -48 48)
; (IRONCLAD::M 3 3 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
; The second argument is a (MOD 1095216660481), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The second argument is a (MOD 1095216660481), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 1 -40 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 280375465082881) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 280375465082881) . #2#), not a (VALUES
; FIXNUM &REST
; T).
; etc.
; (LOGXOR (IRONCLAD::M 0 4 0 0) (IRONCLAD::M 1 5 -8 8) (IRONCLAD::M 2 6 -16 16)
; (IRONCLAD::M 3 7 -24 24) (IRONCLAD::M 0 0 -32 32)
; (IRONCLAD::M 1 1 -40 40) (IRONCLAD::M 2 2 -48 48)
; (IRONCLAD::M 3 3 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The second argument is a (MOD 280375465082881), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 280375465082881), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 2 -48 48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 71776119061217281) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 71776119061217281) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 4 0 0) (IRONCLAD::M 1 5 -8 8) (IRONCLAD::M 2 6 -16 16)
; (IRONCLAD::M 3 7 -24 24) (IRONCLAD::M 0 0 -32 32)
; (IRONCLAD::M 1 1 -40 40) (IRONCLAD::M 2 2 -48 48)
; (IRONCLAD::M 3 3 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; The second argument is a (MOD 71776119061217281), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 71776119061217281), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 3 -56 56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 4 0 0) (IRONCLAD::M 1 5 -8 8) (IRONCLAD::M 2 6 -16 16)
; (IRONCLAD::M 3 7 -24 24) (IRONCLAD::M 0 0 -32 32)
; (IRONCLAD::M 1 1 -40 40) (IRONCLAD::M 2 2 -48 48)
; (IRONCLAD::M 3 3 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; The second argument is a (MOD 18374686479671623681), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 18374686479671623681), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::MOD64-
; (LOGXOR (IRONCLAD::M 0 4 0 0) (IRONCLAD::M 1 5 -8 8)
; (IRONCLAD::M 2 6 -16 16) (IRONCLAD::M 3 7 -24 24)
; (IRONCLAD::M 0 0 -32 32) (IRONCLAD::M 1 1 -40 40)
; (IRONCLAD::M 2 2 -48 48) (IRONCLAD::M 3 3 -56 56))
; (AREF IRONCLAD::K (+ IRONCLAD::K-START 4)))
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1#), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
; etc.
; (IRONCLAD::M 0 5 0 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 6 -8 8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 2 7 -16 16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 3 0 -24 24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 0 1 -32 32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 1095216660481) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 1095216660481) . #2#), not a (VALUES FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 5 0 0) (IRONCLAD::M 1 6 -8 8) (IRONCLAD::M 2 7 -16 16)
; (IRONCLAD::M 3 0 -24 24) (IRONCLAD::M 0 1 -32 32)
; (IRONCLAD::M 1 2 -40 40) (IRONCLAD::M 2 3 -48 48)
; (IRONCLAD::M 3 4 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
; The second argument is a (MOD 1095216660481), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The second argument is a (MOD 1095216660481), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 2 -40 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 280375465082881) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 280375465082881) . #2#), not a (VALUES
; FIXNUM &REST
; T).
; etc.
; (LOGXOR (IRONCLAD::M 0 5 0 0) (IRONCLAD::M 1 6 -8 8) (IRONCLAD::M 2 7 -16 16)
; (IRONCLAD::M 3 0 -24 24) (IRONCLAD::M 0 1 -32 32)
; (IRONCLAD::M 1 2 -40 40) (IRONCLAD::M 2 3 -48 48)
; (IRONCLAD::M 3 4 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The second argument is a (MOD 280375465082881), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 280375465082881), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 3 -48 48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 71776119061217281) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 71776119061217281) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 5 0 0) (IRONCLAD::M 1 6 -8 8) (IRONCLAD::M 2 7 -16 16)
; (IRONCLAD::M 3 0 -24 24) (IRONCLAD::M 0 1 -32 32)
; (IRONCLAD::M 1 2 -40 40) (IRONCLAD::M 2 3 -48 48)
; (IRONCLAD::M 3 4 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; The second argument is a (MOD 71776119061217281), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 71776119061217281), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 4 -56 56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 5 0 0) (IRONCLAD::M 1 6 -8 8) (IRONCLAD::M 2 7 -16 16)
; (IRONCLAD::M 3 0 -24 24) (IRONCLAD::M 0 1 -32 32)
; (IRONCLAD::M 1 2 -40 40) (IRONCLAD::M 2 3 -48 48)
; (IRONCLAD::M 3 4 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; The second argument is a (MOD 18374686479671623681), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 18374686479671623681), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::MOD64-
; (LOGXOR (IRONCLAD::M 0 5 0 0) (IRONCLAD::M 1 6 -8 8)
; (IRONCLAD::M 2 7 -16 16) (IRONCLAD::M 3 0 -24 24)
; (IRONCLAD::M 0 1 -32 32) (IRONCLAD::M 1 2 -40 40)
; (IRONCLAD::M 2 3 -48 48) (IRONCLAD::M 3 4 -56 56))
; (AREF IRONCLAD::K (+ IRONCLAD::K-START 5)))
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1#), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
; etc.
; (IRONCLAD::M 0 6 0 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 7 -8 8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 2 0 -16 16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 3 1 -24 24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 0 2 -32 32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 1095216660481) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 1095216660481) . #2#), not a (VALUES FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 6 0 0) (IRONCLAD::M 1 7 -8 8) (IRONCLAD::M 2 0 -16 16)
; (IRONCLAD::M 3 1 -24 24) (IRONCLAD::M 0 2 -32 32)
; (IRONCLAD::M 1 3 -40 40) (IRONCLAD::M 2 4 -48 48)
; (IRONCLAD::M 3 5 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
; The second argument is a (MOD 1095216660481), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The second argument is a (MOD 1095216660481), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 3 -40 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 280375465082881) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 280375465082881) . #2#), not a (VALUES
; FIXNUM &REST
; T).
; etc.
; (LOGXOR (IRONCLAD::M 0 6 0 0) (IRONCLAD::M 1 7 -8 8) (IRONCLAD::M 2 0 -16 16)
; (IRONCLAD::M 3 1 -24 24) (IRONCLAD::M 0 2 -32 32)
; (IRONCLAD::M 1 3 -40 40) (IRONCLAD::M 2 4 -48 48)
; (IRONCLAD::M 3 5 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The second argument is a (MOD 280375465082881), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 280375465082881), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 4 -48 48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 71776119061217281) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 71776119061217281) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 6 0 0) (IRONCLAD::M 1 7 -8 8) (IRONCLAD::M 2 0 -16 16)
; (IRONCLAD::M 3 1 -24 24) (IRONCLAD::M 0 2 -32 32)
; (IRONCLAD::M 1 3 -40 40) (IRONCLAD::M 2 4 -48 48)
; (IRONCLAD::M 3 5 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; The second argument is a (MOD 71776119061217281), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 71776119061217281), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 5 -56 56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 6 0 0) (IRONCLAD::M 1 7 -8 8) (IRONCLAD::M 2 0 -16 16)
; (IRONCLAD::M 3 1 -24 24) (IRONCLAD::M 0 2 -32 32)
; (IRONCLAD::M 1 3 -40 40) (IRONCLAD::M 2 4 -48 48)
; (IRONCLAD::M 3 5 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; The second argument is a (MOD 18374686479671623681), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 18374686479671623681), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::MOD64-
; (LOGXOR (IRONCLAD::M 0 6 0 0) (IRONCLAD::M 1 7 -8 8)
; (IRONCLAD::M 2 0 -16 16) (IRONCLAD::M 3 1 -24 24)
; (IRONCLAD::M 0 2 -32 32) (IRONCLAD::M 1 3 -40 40)
; (IRONCLAD::M 2 4 -48 48) (IRONCLAD::M 3 5 -56 56))
; (AREF IRONCLAD::K (+ IRONCLAD::K-START 6)))
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1#), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
; etc.
; (IRONCLAD::M 0 7 0 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 1 0 -8 8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 2 1 -16 16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 3 2 -24 24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (IRONCLAD::M 0 3 -32 32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 1095216660481) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 1095216660481) . #2#), not a (VALUES FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 7 0 0) (IRONCLAD::M 1 0 -8 8) (IRONCLAD::M 2 1 -16 16)
; (IRONCLAD::M 3 2 -24 24) (IRONCLAD::M 0 3 -32 32)
; (IRONCLAD::M 1 4 -40 40) (IRONCLAD::M 2 5 -48 48)
; (IRONCLAD::M 3 6 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
; The second argument is a (MOD 1095216660481), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The second argument is a (MOD 1095216660481), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 4 -40 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 280375465082881) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 280375465082881) . #2#), not a (VALUES
; FIXNUM &REST
; T).
; etc.
; (LOGXOR (IRONCLAD::M 0 7 0 0) (IRONCLAD::M 1 0 -8 8) (IRONCLAD::M 2 1 -16 16)
; (IRONCLAD::M 3 2 -24 24) (IRONCLAD::M 0 3 -32 32)
; (IRONCLAD::M 1 4 -40 40) (IRONCLAD::M 2 5 -48 48)
; (IRONCLAD::M 3 6 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The second argument is a (MOD 280375465082881), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 280375465082881), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 5 -48 48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 71776119061217281) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 71776119061217281) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 7 0 0) (IRONCLAD::M 1 0 -8 8) (IRONCLAD::M 2 1 -16 16)
; (IRONCLAD::M 3 2 -24 24) (IRONCLAD::M 0 3 -32 32)
; (IRONCLAD::M 1 4 -40 40) (IRONCLAD::M 2 5 -48 48)
; (IRONCLAD::M 3 6 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; The second argument is a (MOD 71776119061217281), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 71776119061217281), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 6 -56 56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 2) because:
; The result is a (VALUES (MOD 18374686479671623681) . #2#), not a (VALUES
; FIXNUM
; &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 7 0 0) (IRONCLAD::M 1 0 -8 8) (IRONCLAD::M 2 1 -16 16)
; (IRONCLAD::M 3 2 -24 24) (IRONCLAD::M 0 3 -32 32)
; (IRONCLAD::M 1 4 -40 40) (IRONCLAD::M 2 5 -48 48)
; (IRONCLAD::M 3 6 -56 56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; The second argument is a (MOD 18374686479671623681), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; The second argument is a (MOD 18374686479671623681), not a (UNSIGNED-BYTE
; 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::MOD64-
; (LOGXOR (IRONCLAD::M 0 7 0 0) (IRONCLAD::M 1 0 -8 8)
; (IRONCLAD::M 2 1 -16 16) (IRONCLAD::M 3 2 -24 24)
; (IRONCLAD::M 0 3 -32 32) (IRONCLAD::M 1 4 -40 40)
; (IRONCLAD::M 2 5 -48 48) (IRONCLAD::M 3 6 -56 56))
; (AREF IRONCLAD::K (+ IRONCLAD::K-START 7)))
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES
; (INTEGER -18446744073709551615 18446744073709551615)
; . #1#), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
; etc.
; (LOGXOR (IRONCLAD::M 0 0 0 0) (IRONCLAD::M 1 1 -8 8) (IRONCLAD::M 2 2 -16 16)
; (IRONCLAD::M 3 3 -24 24) (IRONCLAD::M 0 4 -32 32)
; (IRONCLAD::M 1 5 -40 40) (IRONCLAD::M 2 6 -48 48)
; (IRONCLAD::M 3 7 -56 56))
;
; note: doing unsigned word to integer coercion (cost 20)
; (LOGXOR (IRONCLAD::M 0 1 0 0) (IRONCLAD::M 1 2 -8 8) (IRONCLAD::M 2 3 -16 16)
; (IRONCLAD::M 3 4 -24 24) (IRONCLAD::M 0 5 -32 32)
; (IRONCLAD::M 1 6 -40 40) (IRONCLAD::M 2 7 -48 48)
; (IRONCLAD::M 3 0 -56 56))
;
; note: doing unsigned word to integer coercion (cost 20)
; (LOGXOR (IRONCLAD::M 0 2 0 0) (IRONCLAD::M 1 3 -8 8) (IRONCLAD::M 2 4 -16 16)
; (IRONCLAD::M 3 5 -24 24) (IRONCLAD::M 0 6 -32 32)
; (IRONCLAD::M 1 7 -40 40) (IRONCLAD::M 2 0 -48 48)
; (IRONCLAD::M 3 1 -56 56))
;
; note: doing unsigned word to integer coercion (cost 20)
; (LOGXOR (IRONCLAD::M 0 3 0 0) (IRONCLAD::M 1 4 -8 8) (IRONCLAD::M 2 5 -16 16)
; (IRONCLAD::M 3 6 -24 24) (IRONCLAD::M 0 7 -32 32)
; (IRONCLAD::M 1 0 -40 40) (IRONCLAD::M 2 1 -48 48)
; (IRONCLAD::M 3 2 -56 56))
;
; note: doing unsigned word to integer coercion (cost 20)
; (LOGXOR (IRONCLAD::M 0 4 0 0) (IRONCLAD::M 1 5 -8 8) (IRONCLAD::M 2 6 -16 16)
; (IRONCLAD::M 3 7 -24 24) (IRONCLAD::M 0 0 -32 32)
; (IRONCLAD::M 1 1 -40 40) (IRONCLAD::M 2 2 -48 48)
; (IRONCLAD::M 3 3 -56 56))
;
; note: doing unsigned word to integer coercion (cost 20)
; (LOGXOR (IRONCLAD::M 0 5 0 0) (IRONCLAD::M 1 6 -8 8) (IRONCLAD::M 2 7 -16 16)
; (IRONCLAD::M 3 0 -24 24) (IRONCLAD::M 0 1 -32 32)
; (IRONCLAD::M 1 2 -40 40) (IRONCLAD::M 2 3 -48 48)
; (IRONCLAD::M 3 4 -56 56))
;
; note: doing unsigned word to integer coercion (cost 20)
; (LOGXOR (IRONCLAD::M 0 6 0 0) (IRONCLAD::M 1 7 -8 8) (IRONCLAD::M 2 0 -16 16)
; (IRONCLAD::M 3 1 -24 24) (IRONCLAD::M 0 2 -32 32)
; (IRONCLAD::M 1 3 -40 40) (IRONCLAD::M 2 4 -48 48)
; (IRONCLAD::M 3 5 -56 56))
;
; note: doing unsigned word to integer coercion (cost 20)
; (LOGXOR (IRONCLAD::M 0 7 0 0) (IRONCLAD::M 1 0 -8 8) (IRONCLAD::M 2 1 -16 16)
; (IRONCLAD::M 3 2 -24 24) (IRONCLAD::M 0 3 -32 32)
; (IRONCLAD::M 1 4 -40 40) (IRONCLAD::M 2 5 -48 48)
; (IRONCLAD::M 3 6 -56 56))
;
; note: doing unsigned word to integer coercion (cost 20)
; processing (DECLAIM (INLINE KALYNA-G512))
; processing (DEFUN KALYNA-G512 ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp
; in: DEFUN KALYNA-G512
; (IRONCLAD::M 0 0 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 7 -8) (IRONCLAD::M 2 6 -16) (IRONCLAD::M 3 5 -24)
; (IRONCLAD::M 4 4 -32) (IRONCLAD::M 5 3 -40) (IRONCLAD::M 6 2 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 7 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 7 -8) (IRONCLAD::M 2 6 -16) (IRONCLAD::M 3 5 -24)
; (IRONCLAD::M 4 4 -32) (IRONCLAD::M 5 3 -40) (IRONCLAD::M 6 2 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 6 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 7 -8) (IRONCLAD::M 2 6 -16) (IRONCLAD::M 3 5 -24)
; (IRONCLAD::M 4 4 -32) (IRONCLAD::M 5 3 -40) (IRONCLAD::M 6 2 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 5 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 7 -8) (IRONCLAD::M 2 6 -16) (IRONCLAD::M 3 5 -24)
; (IRONCLAD::M 4 4 -32) (IRONCLAD::M 5 3 -40) (IRONCLAD::M 6 2 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 4 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 7 -8) (IRONCLAD::M 2 6 -16) (IRONCLAD::M 3 5 -24)
; (IRONCLAD::M 4 4 -32) (IRONCLAD::M 5 3 -40) (IRONCLAD::M 6 2 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 3 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 7 -8) (IRONCLAD::M 2 6 -16) (IRONCLAD::M 3 5 -24)
; (IRONCLAD::M 4 4 -32) (IRONCLAD::M 5 3 -40) (IRONCLAD::M 6 2 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 2 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 7 -8) (IRONCLAD::M 2 6 -16) (IRONCLAD::M 3 5 -24)
; (IRONCLAD::M 4 4 -32) (IRONCLAD::M 5 3 -40) (IRONCLAD::M 6 2 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 1 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 0)) (IRONCLAD::M 0 0 0)
; (IRONCLAD::M 1 7 -8) (IRONCLAD::M 2 6 -16) (IRONCLAD::M 3 5 -24)
; (IRONCLAD::M 4 4 -32) (IRONCLAD::M 5 3 -40) (IRONCLAD::M 6 2 -48)
; (IRONCLAD::M 7 1 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 1 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 7 -16) (IRONCLAD::M 3 6 -24)
; (IRONCLAD::M 4 5 -32) (IRONCLAD::M 5 4 -40) (IRONCLAD::M 6 3 -48)
; (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 0 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 7 -16) (IRONCLAD::M 3 6 -24)
; (IRONCLAD::M 4 5 -32) (IRONCLAD::M 5 4 -40) (IRONCLAD::M 6 3 -48)
; (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 7 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 7 -16) (IRONCLAD::M 3 6 -24)
; (IRONCLAD::M 4 5 -32) (IRONCLAD::M 5 4 -40) (IRONCLAD::M 6 3 -48)
; (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 6 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 7 -16) (IRONCLAD::M 3 6 -24)
; (IRONCLAD::M 4 5 -32) (IRONCLAD::M 5 4 -40) (IRONCLAD::M 6 3 -48)
; (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 5 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 7 -16) (IRONCLAD::M 3 6 -24)
; (IRONCLAD::M 4 5 -32) (IRONCLAD::M 5 4 -40) (IRONCLAD::M 6 3 -48)
; (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 4 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 7 -16) (IRONCLAD::M 3 6 -24)
; (IRONCLAD::M 4 5 -32) (IRONCLAD::M 5 4 -40) (IRONCLAD::M 6 3 -48)
; (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 3 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 7 -16) (IRONCLAD::M 3 6 -24)
; (IRONCLAD::M 4 5 -32) (IRONCLAD::M 5 4 -40) (IRONCLAD::M 6 3 -48)
; (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 2 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 1)) (IRONCLAD::M 0 1 0)
; (IRONCLAD::M 1 0 -8) (IRONCLAD::M 2 7 -16) (IRONCLAD::M 3 6 -24)
; (IRONCLAD::M 4 5 -32) (IRONCLAD::M 5 4 -40) (IRONCLAD::M 6 3 -48)
; (IRONCLAD::M 7 2 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 2 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)) (IRONCLAD::M 0 2 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 7 -24)
; (IRONCLAD::M 4 6 -32) (IRONCLAD::M 5 5 -40) (IRONCLAD::M 6 4 -48)
; (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 1 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)) (IRONCLAD::M 0 2 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 7 -24)
; (IRONCLAD::M 4 6 -32) (IRONCLAD::M 5 5 -40) (IRONCLAD::M 6 4 -48)
; (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 0 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)) (IRONCLAD::M 0 2 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 7 -24)
; (IRONCLAD::M 4 6 -32) (IRONCLAD::M 5 5 -40) (IRONCLAD::M 6 4 -48)
; (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 7 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)) (IRONCLAD::M 0 2 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 7 -24)
; (IRONCLAD::M 4 6 -32) (IRONCLAD::M 5 5 -40) (IRONCLAD::M 6 4 -48)
; (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 6 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)) (IRONCLAD::M 0 2 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 7 -24)
; (IRONCLAD::M 4 6 -32) (IRONCLAD::M 5 5 -40) (IRONCLAD::M 6 4 -48)
; (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 5 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)) (IRONCLAD::M 0 2 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 7 -24)
; (IRONCLAD::M 4 6 -32) (IRONCLAD::M 5 5 -40) (IRONCLAD::M 6 4 -48)
; (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 4 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)) (IRONCLAD::M 0 2 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 7 -24)
; (IRONCLAD::M 4 6 -32) (IRONCLAD::M 5 5 -40) (IRONCLAD::M 6 4 -48)
; (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 3 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 2)) (IRONCLAD::M 0 2 0)
; (IRONCLAD::M 1 1 -8) (IRONCLAD::M 2 0 -16) (IRONCLAD::M 3 7 -24)
; (IRONCLAD::M 4 6 -32) (IRONCLAD::M 5 5 -40) (IRONCLAD::M 6 4 -48)
; (IRONCLAD::M 7 3 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 3 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)) (IRONCLAD::M 0 3 0)
; (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 7 -32) (IRONCLAD::M 5 6 -40) (IRONCLAD::M 6 5 -48)
; (IRONCLAD::M 7 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 2 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)) (IRONCLAD::M 0 3 0)
; (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 7 -32) (IRONCLAD::M 5 6 -40) (IRONCLAD::M 6 5 -48)
; (IRONCLAD::M 7 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 1 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)) (IRONCLAD::M 0 3 0)
; (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 7 -32) (IRONCLAD::M 5 6 -40) (IRONCLAD::M 6 5 -48)
; (IRONCLAD::M 7 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 0 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)) (IRONCLAD::M 0 3 0)
; (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 7 -32) (IRONCLAD::M 5 6 -40) (IRONCLAD::M 6 5 -48)
; (IRONCLAD::M 7 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 7 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)) (IRONCLAD::M 0 3 0)
; (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 7 -32) (IRONCLAD::M 5 6 -40) (IRONCLAD::M 6 5 -48)
; (IRONCLAD::M 7 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 6 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)) (IRONCLAD::M 0 3 0)
; (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 7 -32) (IRONCLAD::M 5 6 -40) (IRONCLAD::M 6 5 -48)
; (IRONCLAD::M 7 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 5 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)) (IRONCLAD::M 0 3 0)
; (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 7 -32) (IRONCLAD::M 5 6 -40) (IRONCLAD::M 6 5 -48)
; (IRONCLAD::M 7 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 4 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 3)) (IRONCLAD::M 0 3 0)
; (IRONCLAD::M 1 2 -8) (IRONCLAD::M 2 1 -16) (IRONCLAD::M 3 0 -24)
; (IRONCLAD::M 4 7 -32) (IRONCLAD::M 5 6 -40) (IRONCLAD::M 6 5 -48)
; (IRONCLAD::M 7 4 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 4 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 4)) (IRONCLAD::M 0 4 0)
; (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 7 -40) (IRONCLAD::M 6 6 -48)
; (IRONCLAD::M 7 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 3 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 4)) (IRONCLAD::M 0 4 0)
; (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 7 -40) (IRONCLAD::M 6 6 -48)
; (IRONCLAD::M 7 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 2 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 4)) (IRONCLAD::M 0 4 0)
; (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 7 -40) (IRONCLAD::M 6 6 -48)
; (IRONCLAD::M 7 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 1 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 4)) (IRONCLAD::M 0 4 0)
; (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 7 -40) (IRONCLAD::M 6 6 -48)
; (IRONCLAD::M 7 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 0 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 4)) (IRONCLAD::M 0 4 0)
; (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 7 -40) (IRONCLAD::M 6 6 -48)
; (IRONCLAD::M 7 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 7 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 4)) (IRONCLAD::M 0 4 0)
; (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 7 -40) (IRONCLAD::M 6 6 -48)
; (IRONCLAD::M 7 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 6 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 4)) (IRONCLAD::M 0 4 0)
; (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 7 -40) (IRONCLAD::M 6 6 -48)
; (IRONCLAD::M 7 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 5 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 4)) (IRONCLAD::M 0 4 0)
; (IRONCLAD::M 1 3 -8) (IRONCLAD::M 2 2 -16) (IRONCLAD::M 3 1 -24)
; (IRONCLAD::M 4 0 -32) (IRONCLAD::M 5 7 -40) (IRONCLAD::M 6 6 -48)
; (IRONCLAD::M 7 5 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 5 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 5)) (IRONCLAD::M 0 5 0)
; (IRONCLAD::M 1 4 -8) (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 7 -48)
; (IRONCLAD::M 7 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 4 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 5)) (IRONCLAD::M 0 5 0)
; (IRONCLAD::M 1 4 -8) (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 7 -48)
; (IRONCLAD::M 7 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 3 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 5)) (IRONCLAD::M 0 5 0)
; (IRONCLAD::M 1 4 -8) (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 7 -48)
; (IRONCLAD::M 7 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 2 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 5)) (IRONCLAD::M 0 5 0)
; (IRONCLAD::M 1 4 -8) (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 7 -48)
; (IRONCLAD::M 7 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 1 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 5)) (IRONCLAD::M 0 5 0)
; (IRONCLAD::M 1 4 -8) (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 7 -48)
; (IRONCLAD::M 7 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 0 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 5)) (IRONCLAD::M 0 5 0)
; (IRONCLAD::M 1 4 -8) (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 7 -48)
; (IRONCLAD::M 7 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 7 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 5)) (IRONCLAD::M 0 5 0)
; (IRONCLAD::M 1 4 -8) (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 7 -48)
; (IRONCLAD::M 7 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 6 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 5)) (IRONCLAD::M 0 5 0)
; (IRONCLAD::M 1 4 -8) (IRONCLAD::M 2 3 -16) (IRONCLAD::M 3 2 -24)
; (IRONCLAD::M 4 1 -32) (IRONCLAD::M 5 0 -40) (IRONCLAD::M 6 7 -48)
; (IRONCLAD::M 7 6 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 6 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 6)) (IRONCLAD::M 0 6 0)
; (IRONCLAD::M 1 5 -8) (IRONCLAD::M 2 4 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 5 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 6)) (IRONCLAD::M 0 6 0)
; (IRONCLAD::M 1 5 -8) (IRONCLAD::M 2 4 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 4 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 6)) (IRONCLAD::M 0 6 0)
; (IRONCLAD::M 1 5 -8) (IRONCLAD::M 2 4 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 3 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 6)) (IRONCLAD::M 0 6 0)
; (IRONCLAD::M 1 5 -8) (IRONCLAD::M 2 4 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 2 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 6)) (IRONCLAD::M 0 6 0)
; (IRONCLAD::M 1 5 -8) (IRONCLAD::M 2 4 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 1 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 6)) (IRONCLAD::M 0 6 0)
; (IRONCLAD::M 1 5 -8) (IRONCLAD::M 2 4 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 0 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 6)) (IRONCLAD::M 0 6 0)
; (IRONCLAD::M 1 5 -8) (IRONCLAD::M 2 4 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 7 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 6)) (IRONCLAD::M 0 6 0)
; (IRONCLAD::M 1 5 -8) (IRONCLAD::M 2 4 -16) (IRONCLAD::M 3 3 -24)
; (IRONCLAD::M 4 2 -32) (IRONCLAD::M 5 1 -40) (IRONCLAD::M 6 0 -48)
; (IRONCLAD::M 7 7 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::M 0 7 0)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 7)) (IRONCLAD::M 0 7 0)
; (IRONCLAD::M 1 6 -8) (IRONCLAD::M 2 5 -16) (IRONCLAD::M 3 4 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 2 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 1 6 -8)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 7)) (IRONCLAD::M 0 7 0)
; (IRONCLAD::M 1 6 -8) (IRONCLAD::M 2 5 -16) (IRONCLAD::M 3 4 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 2 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 2 5 -16)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 7)) (IRONCLAD::M 0 7 0)
; (IRONCLAD::M 1 6 -8) (IRONCLAD::M 2 5 -16) (IRONCLAD::M 3 4 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 2 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 3 4 -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 7)) (IRONCLAD::M 0 7 0)
; (IRONCLAD::M 1 6 -8) (IRONCLAD::M 2 5 -16) (IRONCLAD::M 3 4 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 2 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 4 3 -32)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 7)) (IRONCLAD::M 0 7 0)
; (IRONCLAD::M 1 6 -8) (IRONCLAD::M 2 5 -16) (IRONCLAD::M 3 4 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 2 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 5 2 -40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 7)) (IRONCLAD::M 0 7 0)
; (IRONCLAD::M 1 6 -8) (IRONCLAD::M 2 5 -16) (IRONCLAD::M 3 4 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 2 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 6 1 -48)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 7)) (IRONCLAD::M 0 7 0)
; (IRONCLAD::M 1 6 -8) (IRONCLAD::M 2 5 -16) (IRONCLAD::M 3 4 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 2 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::M 7 0 -56)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
; (LOGXOR (AREF IRONCLAD::K (+ IRONCLAD::K-START 7)) (IRONCLAD::M 0 7 0)
; (IRONCLAD::M 1 6 -8) (IRONCLAD::M 2 5 -16) (IRONCLAD::M 3 4 -24)
; (IRONCLAD::M 4 3 -32) (IRONCLAD::M 5 2 -40) (IRONCLAD::M 6 1 -48)
; (IRONCLAD::M 7 0 -56))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; processing (DEFCLASS KALYNA512 ...)
; processing (DEFMETHOD SCHEDULE-KEY ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp
; in: DEFMETHOD SCHEDULE-KEY (KALYNA512 T)
; (IRONCLAD::KALYNA-GL512 IRONCLAD::T1 IRONCLAD::ENCRYPTION-ROUND-KEYS 144
; IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::KALYNA-GL512 IRONCLAD::T1 IRONCLAD::ENCRYPTION-ROUND-KEYS 0
; IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::KALYNA-GL512 IRONCLAD::T1 IRONCLAD::T2 0 IRONCLAD::KEY 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::KALYNA-GL512 IRONCLAD::T1 IRONCLAD::ENCRYPTION-ROUND-KEYS
; IRONCLAD::N IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD::KALYNA-G512 IRONCLAD::T2 IRONCLAD::T1 IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-GL512 IRONCLAD::T1 IRONCLAD::ENCRYPTION-ROUND-KEYS
; IRONCLAD::N IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-MAKE-ODD-KEY 8 IRONCLAD::ENCRYPTION-ROUND-KEYS IRONCLAD::N
; IRONCLAD::ENCRYPTION-ROUND-KEYS (+ IRONCLAD::N 8))
; --> BLOCK MACROLET ECASE LET COND IF IF IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 3)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 2)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 3)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 2)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 4)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 3)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 4)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 3)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 5)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 4)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 5)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 4)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 6)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 5)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 6)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 5)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 7)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 6)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 7)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 6)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 7)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 7)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 2)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 2)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G512 IRONCLAD::T2 IRONCLAD::T1 IRONCLAD::KEY 0)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-GL512 IRONCLAD::T1 IRONCLAD::T2 0 IRONCLAD::KEY 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G0512 IRONCLAD::T2 IRONCLAD::KS)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G512 IRONCLAD::T2 IRONCLAD::T1 IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-GL512 IRONCLAD::T1 IRONCLAD::ENCRYPTION-ROUND-KEYS 0
; IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-MAKE-ODD-KEY 8 IRONCLAD::ENCRYPTION-ROUND-KEYS 0
; IRONCLAD::ENCRYPTION-ROUND-KEYS 8)
; --> BLOCK MACROLET ECASE LET COND IF IF IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 3)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 2)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 3)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 2)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 4)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 3)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 4)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 3)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 5)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 4)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 5)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 4)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 6)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 5)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 6)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 5)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 7)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 6)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 7)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 6)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 7)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 7)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 0)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF IF PROGN IRONCLAD::M SETF LET* LOGIOR
; --> IRONCLAD::MOD64ASH LOGAND
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 2)) 40)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241)
; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T).
; unable to do #1# (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 20282409603651670422847739658241) . #2#), not a (VALUES
; FIXNUM
; &REST
; T).
; etc.
; ==>
; (ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) -24)
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; --> BLOCK MACROLET ECASE LET COND IF IF IF PROGN IRONCLAD::M SETF LET*
; ==>
; (LOGIOR (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 2)) 40)
; (IRONCLAD::MOD64ASH (AREF IRONCLAD::EK (+ IRONCLAD::EK-START 1)) -24))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 40), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G512 IRONCLAD::T2 IRONCLAD::T1 IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-GL512 IRONCLAD::T1 IRONCLAD::ENCRYPTION-ROUND-KEYS 144
; IRONCLAD::KSC 0)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-IMC512 IRONCLAD::DECRYPTION-ROUND-KEYS IRONCLAD::N)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; processing (DEFINE-BLOCK-ENCRYPTOR KALYNA512 ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp
; in: DEFINE-BLOCK-ENCRYPTOR KALYNA512
; (IRONCLAD::KALYNA-ADD-KEY 8 IRONCLAD::T2 0 IRONCLAD::T1
; IRONCLAD::ENCRYPTION-ROUND-KEYS)
; --> PROGN SYMBOL-MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT (+ IRONCLAD::PLAINTEXT-START 16))
; --> BLOCK DPB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT (+ IRONCLAD::PLAINTEXT-START 40))
; --> BLOCK DPB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT (+ IRONCLAD::PLAINTEXT-START 8))
; --> BLOCK DPB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; (IRONCLAD::KALYNA-GL512 IRONCLAD::T2 IRONCLAD::T1 0
; IRONCLAD::ENCRYPTION-ROUND-KEYS 144)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 32)
; &REST T).
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT (+ IRONCLAD::PLAINTEXT-START 32))
; --> BLOCK DPB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT (+ IRONCLAD::PLAINTEXT-START 56))
; --> BLOCK DPB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT (+ IRONCLAD::PLAINTEXT-START 48))
; --> BLOCK DPB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START)
; --> BLOCK DPB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT (+ IRONCLAD::PLAINTEXT-START 24))
; --> BLOCK DPB
; ==>
; 1
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
;
; note: unable to
; convert to inline logical operations
; due to type uncertainty:
; The result is a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; (IRONCLAD::KALYNA-ADD-KEY 8 IRONCLAD::T2 0 IRONCLAD::T1
; IRONCLAD::ENCRYPTION-ROUND-KEYS)
; --> PROGN SYMBOL-MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 36893488147419103231) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (MOD 36893488147419103231) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 36893488147419103231) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (MOD 36893488147419103231) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 36893488147419103231) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (MOD 36893488147419103231) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 36893488147419103231) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (MOD 36893488147419103231) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 36893488147419103231) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (MOD 36893488147419103231) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 36893488147419103231) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (MOD 36893488147419103231) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 36893488147419103231) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (MOD 36893488147419103231) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do #1=inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; unable to do #1# (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (MOD 36893488147419103231) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (MOD 36893488147419103231) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G512 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::ENCRYPTION-ROUND-KEYS 8)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G512 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::ENCRYPTION-ROUND-KEYS 16)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G512 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::ENCRYPTION-ROUND-KEYS 24)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G512 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::ENCRYPTION-ROUND-KEYS 32)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G512 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::ENCRYPTION-ROUND-KEYS 40)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G512 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::ENCRYPTION-ROUND-KEYS 48)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G512 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::ENCRYPTION-ROUND-KEYS 56)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G512 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::ENCRYPTION-ROUND-KEYS 64)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G512 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::ENCRYPTION-ROUND-KEYS 72)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G512 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::ENCRYPTION-ROUND-KEYS 80)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G512 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::ENCRYPTION-ROUND-KEYS 88)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G512 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::ENCRYPTION-ROUND-KEYS 96)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G512 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::ENCRYPTION-ROUND-KEYS 104)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G512 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::ENCRYPTION-ROUND-KEYS 112)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G512 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::ENCRYPTION-ROUND-KEYS 120)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G512 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::ENCRYPTION-ROUND-KEYS 128)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-G512 IRONCLAD::T1 IRONCLAD::T2
; IRONCLAD::ENCRYPTION-ROUND-KEYS 136)
; --> BLOCK MACROLET SETF LET* LOGXOR
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 64) . #1#), not a (VALUES
; (UNSIGNED-BYTE
; 32)
; &REST T).
; etc.
; (IRONCLAD::KALYNA-GL512 IRONCLAD::T2 IRONCLAD::T1 0
; IRONCLAD::ENCRYPTION-ROUND-KEYS 144)
; --> BLOCK MACROLET SETF LET* IRONCLAD::MOD64+ LDB
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 56) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 56), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 56), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 48) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 48), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 48), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 40) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &